Diff MANUAL

Files changed (139) hide show

C://PATCH_CONTROL//{TO → FROM}/AccountSnapshot_class_info.txt +6 -1
C://PATCH_CONTROL//{TO → FROM}/Account_class_info.txt +6 -1
C://PATCH_CONTROL//{TO → FROM}/Account_mAnonymize.txt +22 -0
C://PATCH_CONTROL//{TO → FROM}/Account_mGetBucketsByPaymenttHierarchy.txt +7 -0
C://PATCH_CONTROL//FROM/Account_mHasPledgedAccounts.txt +7 -0
C://PATCH_CONTROL//FROM/Account_virtHasPledgedAccount.txt +10 -0
C://PATCH_CONTROL//{TO → FROM}/AdminCalculator_mInitInst_InvestorType.txt +4 -4
C://PATCH_CONTROL//{TO → FROM}/AdminCalculator_mInitLender_FeeCode.txt +3 -1
C://PATCH_CONTROL//{TO → FROM}/AdvanceStatementCalculator_mGetTotals.txt +15 -1
C://PATCH_CONTROL//{TO → FROM}/AdvanceStatementFormHelp_mCalculateNetAdvance.txt +12 -2
C://PATCH_CONTROL//FROM/AnnualStatementAddress_mAnonymize.txt +67 -0
C://PATCH_CONTROL//FROM/AnnualStatementData_mAnonymize.txt +43 -0
C://PATCH_CONTROL//{TO → FROM}/Company_class_info.txt +1 -1
C://PATCH_CONTROL//{TO → FROM}/Contact_class_info.txt +1 -1
C://PATCH_CONTROL//FROM/CoreCombo_mRemoveItem.txt +18 -0
C://PATCH_CONTROL//{TO → FROM}/CoreCurrencyTextBox_mPositionCurrencyLabel.txt +2 -1
C://PATCH_CONTROL//{TO → FROM}/CoreDateTextBox_paint.txt +2 -0
C://PATCH_CONTROL//{TO → FROM}/CoreSchema_mDoCommitActions.txt +2 -1
C://PATCH_CONTROL//{TO → FROM}/CoreSchema_mJadeBatchExtract.txt +7 -1
C://PATCH_CONTROL//FROM/CoreSchema_mRemotePatchCopy.txt +179 -0
C://PATCH_CONTROL//{TO → FROM}/CoreSchema_mSendMailv3.txt +6 -3
C://PATCH_CONTROL//{TO → FROM}/CoreTextBox_visible.txt +4 -4
C://PATCH_CONTROL//{TO → FROM}/Division_class_info.txt +1 -1
C://PATCH_CONTROL//{TO → FROM}/Employee_class_info.txt +1 -1
C://PATCH_CONTROL//{TO → FROM}/FeeCode_class_info.txt +10 -0
C://PATCH_CONTROL//FROM/FeeCode_mGetANotIncludedInAdvStm.txt +19 -0
C://PATCH_CONTROL//{TO → FROM}/FeeCode_mSetDetails.txt +6 -2
C://PATCH_CONTROL//{TO → FROM}/FinancialTxnAgent_trxCreateGLTxn.txt +1 -1
C://PATCH_CONTROL//{TO → FROM}/FinancialTxnAgent_trxPostPaymentRealization.txt +5 -2
C://PATCH_CONTROL//{TO → FROM}/FinancialTxnAgent_trxRealizeFeeInterest.txt +32 -1
C://PATCH_CONTROL//{TO → FROM}/FormCreatePoolingRun_initialize.txt +14 -1
C://PATCH_CONTROL//{TO → FROM}/FormCreateTxn_mDoAction.txt +6 -3
C://PATCH_CONTROL//{TO → FROM}/FormCreateTxn_mValidate.txt +1 -1
C://PATCH_CONTROL//{TO → FROM}/FormEditAccountDetails_class_info.txt +10 -0
C://PATCH_CONTROL//{TO → FROM}/FormEditAccountDetails_mLoadDetails.txt +11 -0
C://PATCH_CONTROL//{TO → FROM}/FormEditCoreTranslatableString_mValidate.txt +2 -0
C://PATCH_CONTROL//{TO → FROM}/FormEditPayout_btnCreateDoc_click.txt +3 -2
C://PATCH_CONTROL//{TO → FROM}/FormGlobalAuditViewer_mGetDesc.txt +5 -0
C://PATCH_CONTROL//TO/FormLogonMessaging_class_info.txt +0 -779
C://PATCH_CONTROL//{TO → FROM}/FormMDIFeeSetup_class_info.txt +10 -0
C://PATCH_CONTROL//{TO → FROM}/FormMDIFeeSetup_mDoAction.txt +4 -1
C://PATCH_CONTROL//{TO → FROM}/FormMDIFeeSetup_mListRowColChange.txt +2 -0
C://PATCH_CONTROL//FROM/FormMDIInvestorType_cboPlanningPools_displayRow.txt +21 -0
C://PATCH_CONTROL//{TO → FROM}/FormMDIInvestorType_class_info.txt +10 -0
C://PATCH_CONTROL//{TO → FROM}/FormMDIInvestorType_initialize.txt +4 -0
C://PATCH_CONTROL//{TO → FROM}/FormMDIInvestorType_mDoAction.txt +4 -1
C://PATCH_CONTROL//{TO → FROM}/FormMDIInvestorType_mLoadDetails.txt +16 -0
C://PATCH_CONTROL//TO/FormMesagingMgrMDIChild_class_info.txt +0 -584
C://PATCH_CONTROL//TO/FormMessageDetails_btnOK_click.txt +0 -19
C://PATCH_CONTROL//TO/FormMessageDetails_class_info.txt +0 -614
C://PATCH_CONTROL//TO/FormMessageDetails_mSetDetails.txt +0 -23
C://PATCH_CONTROL//TO/FormMessagingMgrMain_class_info.txt +0 -689
C://PATCH_CONTROL//TO/FormMessagingMgrMain_initialize.txt +0 -44
C://PATCH_CONTROL//TO/FormMessagingMgrMain_jdbRight_userResize.txt +0 -19
C://PATCH_CONTROL//TO/FormMessagingMgrMain_mResize.txt +0 -20
C://PATCH_CONTROL//TO/FormMessagingMgrMain_mSetStatusBar.txt +0 -19
C://PATCH_CONTROL//TO/FormMessagingMgrMain_mUserPreferences.txt +0 -19
C://PATCH_CONTROL//TO/FormMessagingMgrMain_mnuExit_click.txt +0 -19
C://PATCH_CONTROL//TO/FormMessagingMgrMain_mnuPreferences_click.txt +0 -19
C://PATCH_CONTROL//TO/FormMessagingMgrMain_resize.txt +0 -19
C://PATCH_CONTROL//TO/FormMessagingMgrModal_class_info.txt +0 -584
C://PATCH_CONTROL//TO/FormMessagingMgr_class_info.txt +0 -584
C://PATCH_CONTROL//TO/FormMessagingMgr_initialize.txt +0 -19
C://PATCH_CONTROL//TO/FormMessagingMgr_load.txt +0 -19
C://PATCH_CONTROL//TO/FormMessagingMonitor_class_info.txt +0 -689
C://PATCH_CONTROL//TO/FormMessagingMonitor_initialize.txt +0 -21
C://PATCH_CONTROL//TO/FormMessagingMonitor_jdbAgents_userResize.txt +0 -8
C://PATCH_CONTROL//TO/FormMessagingMonitor_jdbFailures_userResize.txt +0 -19
C://PATCH_CONTROL//TO/FormMessagingMonitor_mCheckSectionHeight.txt +0 -12
C://PATCH_CONTROL//TO/FormMessagingMonitor_mDeleteMessageFailure.txt +0 -29
C://PATCH_CONTROL//TO/FormMessagingMonitor_mFormatAgentTable.txt +0 -25
C://PATCH_CONTROL//TO/FormMessagingMonitor_mFormatFailuresTable.txt +0 -34
C://PATCH_CONTROL//TO/FormMessagingMonitor_mLoadAgentTable.txt +0 -21
C://PATCH_CONTROL//TO/FormMessagingMonitor_mLoadFailuresTable.txt +0 -22
C://PATCH_CONTROL//TO/FormMessagingMonitor_mRefreshFailedFiles.txt +0 -21
C://PATCH_CONTROL//TO/FormMessagingMonitor_mViewMessageFailure.txt +0 -25
C://PATCH_CONTROL//TO/FormMessagingMonitor_mnuDeleteFailure_click.txt +0 -19
C://PATCH_CONTROL//TO/FormMessagingMonitor_mnuViewFailure_click.txt +0 -19
C://PATCH_CONTROL//TO/FormMessagingMonitor_tblAgents_displayRow.txt +0 -19
C://PATCH_CONTROL//TO/FormMessagingMonitor_tblFailures_contextMenu.txt +0 -41
C://PATCH_CONTROL//TO/FormMessagingMonitor_tblFailures_displayRow.txt +0 -22
C://PATCH_CONTROL//TO/FormMessagingMonitor_tblFiles_dblClick.txt +0 -31
C://PATCH_CONTROL//TO/FormMessagingMonitor_tblFiles_displayRow.txt +0 -22
C://PATCH_CONTROL//TO/FormMessagingMonitor_tblFiles_keyDown.txt +0 -40
C://PATCH_CONTROL//TO/FormMessagingMonitor_timerEvent.txt +0 -31
C://PATCH_CONTROL//{TO → FROM}/FormPoolAddComponent_mValidate.txt +6 -0
C://PATCH_CONTROL//{TO → FROM}/FormRenewalWizard_mPopulateFormFromRenewalEvntFO.txt +9 -0
C://PATCH_CONTROL//FROM/FormWorkPackageTransaction_mGetFundsTypes.txt +45 -0
C://PATCH_CONTROL//FROM/FormWorkTransaction_mGetFundsTypes.txt +34 -0
C://PATCH_CONTROL//{TO → FROM}/FormWorkTransaction_mLoadFundsTypeTable.txt +4 -2
C://PATCH_CONTROL//{TO → FROM}/FundingAddress_mAnonymize.txt +4 -5
C://PATCH_CONTROL//TO/GMessagingSchema_class_info.txt +0 -24
C://PATCH_CONTROL//{TO → FROM}/GeneralTxnAgent_trxUpdateFeeCode.txt +7 -3
C://PATCH_CONTROL//{TO → FROM}/GeneralTxnAgent_trxUpdateInvestorType.txt +6 -1
C://PATCH_CONTROL//{TO → FROM}/Individual_class_info.txt +1 -1
C://PATCH_CONTROL//{TO → FROM}/InvestorType_class_info.txt +5 -0
C://PATCH_CONTROL//FROM/InvestorType_mGetDefaultPool.txt +18 -0
C://PATCH_CONTROL//FROM/InvestorType_mSetDefaultPool.txt +18 -0
C://PATCH_CONTROL//FROM/JobExtractsPledgedLoans_class_info.txt +161 -0
C://PATCH_CONTROL//FROM/JobExtractsPledgedLoans_mGetParamStrings.txt +40 -0
C://PATCH_CONTROL//FROM/JobExtractsPledgedLoans_mListParams.txt +9 -0
C://PATCH_CONTROL//FROM/JobExtractsPledgedLoans_mName.txt +26 -0
C://PATCH_CONTROL//FROM/JobExtractsPledgedLoans_mRun.txt +172 -0
C://PATCH_CONTROL//FROM/JobExtractsPledgedLoans_mSetParameters.txt +26 -0
C://PATCH_CONTROL//FROM/JobExtractsPledgedLoans_mValidateParams.txt +52 -0
C://PATCH_CONTROL//{TO → FROM}/JobPostEvents_mProcessJob.txt +21 -6
C://PATCH_CONTROL//{TO → FROM}/LMSReports_xml_PrepaymentLetter_v0.txt +13 -1
C://PATCH_CONTROL//{TO → FROM}/LMSReports_xml_PrepaymentLetter_v1.txt +13 -2
C://PATCH_CONTROL//{TO → FROM}/LMSReports_xml__CreateCOB_v0.txt +16 -1
C://PATCH_CONTROL//{TO → FROM}/LMSReports_xml__CreateCOB_v1.txt +20 -2
C://PATCH_CONTROL//{TO → FROM}/MessageMorWeb_mProcess_ImportDeal.txt +3 -1
C://PATCH_CONTROL//FROM/MessageProcessingAgent_mCheckLendeskMessages.txt +20 -0
C://PATCH_CONTROL//{TO → FROM}/MessageProcessingAgent_mProcessMessage.txt +1 -0
C://PATCH_CONTROL//{TO → FROM}/MessageProcessor_mStartTimer.txt +5 -0
C://PATCH_CONTROL//{TO → FROM}/MessageProcessor_timerEvent.txt +5 -0
C://PATCH_CONTROL//TO/MessagingSchema_class_info.txt +0 -1213
C://PATCH_CONTROL//TO/MessagingSchema_mAppNameFriendly.txt +0 -22
C://PATCH_CONTROL//TO/MessagingSchema_mFinalizeMessagingWorker.txt +0 -28
C://PATCH_CONTROL//TO/MessagingSchema_mFinalizeMsgMgr.txt +0 -19
C://PATCH_CONTROL//TO/MessagingSchema_mFinalizeMsgProcessor.txt +0 -22
C://PATCH_CONTROL//TO/MessagingSchema_mGetErrorFiles.txt +0 -31
C://PATCH_CONTROL//TO/MessagingSchema_mGetLogonFormClass.txt +0 -20
C://PATCH_CONTROL//TO/MessagingSchema_mInitializeMsgMgr.txt +0 -21
C://PATCH_CONTROL//TO/MessagingSchema_mInitializeMsgProcessor.txt +0 -44
C://PATCH_CONTROL//TO/MessagingSchema_mSetReferences.txt +0 -51
C://PATCH_CONTROL//TO/MessagingSchema_mStartWorking.txt +0 -73
C://PATCH_CONTROL//TO/MessagingSchema_mTranslatableName.txt +0 -22
C://PATCH_CONTROL//TO/MessagingSchema_userNotification.txt +0 -26
C://PATCH_CONTROL//FROM/OperationControl_mToggleLendesk.txt +41 -0
C://PATCH_CONTROL//{TO → FROM}/RegressionAgent_init_Core2.txt +2 -2
C://PATCH_CONTROL//{TO → FROM}/RegressionScript_script_create_FeeCode.txt +3 -1
C://PATCH_CONTROL//{TO → FROM}/SelectionCondition_mEvaluateObject.txt +1 -0
C://PATCH_CONTROL//{TO → FROM}/ServicingModelSchema_mBuildInfo.txt +2 -2
C://PATCH_CONTROL//{TO → FROM}/SystemEventEngine_mProcessAdvance.txt +3 -1
C://PATCH_CONTROL//{TO → FROM}/UnderwritingData_class_info.txt +40 -3
C://PATCH_CONTROL//FROM/UnderwritingData_getPledgedAccount.txt +25 -0
C://PATCH_CONTROL//FROM/UnderwritingData_setPledgedAccount.txt +26 -0
C://PATCH_CONTROL//FROM/UnderwritingData_virtPledgedAccountString.txt +34 -0
C://PATCH_CONTROL//{TO → FROM}/User_mIsDeveloper.txt +5 -7

C://PATCH_CONTROL//{TO → FROM}/AccountSnapshot_class_info.txt RENAMED Viewed

@@ -966,7 +966,7 @@ LEN:12
 NAME:myUnderwritingData
 LEN:12
 NAME:rpsBrokerConditions
@@ -1129,6 +1129,11 @@ Patch Number:	34241
 Ticket:			99999
 Purpose:		Not Implemented
 NAME:virtInitBrokerName
 LEN:-1

 NAME:myUnderwritingData
 LEN:12
+Pledged Account
 NAME:rpsBrokerConditions
 Ticket:			99999
 Purpose:		Not Implemented
+NAME:virtHasPledgedAccount
+LEN:1
+Pledged Account
 NAME:virtInitBrokerName
 LEN:-1

C://PATCH_CONTROL//{TO → FROM}/Account_class_info.txt RENAMED Viewed

@@ -949,7 +949,7 @@ LEN:12
 NAME:myUnderwritingData
 LEN:12
 NAME:rpsBrokerConditions
@@ -1112,6 +1112,11 @@ Patch Number:	34241
 Ticket:			99999
 Purpose:		Not Implemented
 NAME:virtInitBrokerName
 LEN:-1

 NAME:myUnderwritingData
 LEN:12
+Pledged Account
 NAME:rpsBrokerConditions
 Ticket:			99999
 Purpose:		Not Implemented
+NAME:virtHasPledgedAccount
+LEN:1
+Pledged Account
 NAME:virtInitBrokerName
 LEN:-1

C://PATCH_CONTROL//{TO → FROM}/Account_mAnonymize.txt RENAMED Viewed

@@ -21,6 +21,11 @@ vars
 	vID : String;
 	vPaymentGroup : PaymentGroup;
 	vObjectInfo : String;
 begin
 	vAnonymizer := pConfigurator;
@@ -93,8 +98,25 @@ begin
 	//vInterface.allDocumentItemsCreated.purge;
 	virtAllNotes.purge;
 	allConditionTracking.purge;
 	allSnapshot.purge;
 	//#10888 Gaurav 13Aug19 {122333} : Added global logic to purge relevant audit entities.
 	mPurgeAudits;

 	vID : String;
 	vPaymentGroup : PaymentGroup;
 	vObjectInfo : String;
+	vSnapshot : AccountSnapshot;
+	vSnapClient : AccountClient;
+	vClientList : ClientByNameDict;
+	vAnnualStatementData : AnnualStatementData;
 begin
 	vAnonymizer := pConfigurator;
 	//vInterface.allDocumentItemsCreated.purge;
 	virtAllNotes.purge;
 	allConditionTracking.purge;
+	// #HTB-1519 MarkusJ 18Oct22 {124733} : Delete Account Snapshot's Clients
+	create vClientList transient;
+	foreach vSnapshot in allSnapshot do
+		foreach vSnapClient in vSnapshot.allClientByID do
+			//Check client doesn't exist elsewhere (never should on a snapshot)
+			if vSnapClient.myClient.allAccountLinks.size = 1 and vSnapClient.myClient.myLender = null then
+				vClientList.add(vSnapClient.myClient);
+			endif;
+		endforeach;
+	endforeach;
+	vClientList.purge;
 	allSnapshot.purge;
+	// #HTB-1482 MarkusJ 18Oct22 {124733} : Anonymize AnnualStatementData
+	foreach vAnnualStatementData in allAnnualStatements do
+		vAnnualStatementData.mAnonymize(pConfigurator);
+	endforeach;
 	//#10888 Gaurav 13Aug19 {122333} : Added global logic to purge relevant audit entities.
 	mPurgeAudits;

C://PATCH_CONTROL//{TO → FROM}/Account_mGetBucketsByPaymenttHierarchy.txt RENAMED Viewed

@@ -51,6 +51,13 @@ begin
 			vAllowInactiveComponent := self.enStatus = KN_PAIDOUT and (pTxnDefinition.mIsFeeCharge or pTxnDefinition.misCollectionCharge or pTxnDefinition.mIsCreditFeeOrCollectionCost) and app.myLender.mySystemFlag.mGetValueBoolean(SystemFlag.FLAG_SERV_COLLECTION_COST_FEES_FOR_PAIDOUT);
 			// HTB-134 BrandonS 04Jan21 {123282} : allow use of inactive component if vAllowInactiveComponent is true
 			if (vComponent.mGetProduct = vDefinitionItem.myServicingProduct or (vDefinitionItem.myProductTypeGroup <> null and vComponent.mGetProduct.myProductTypeGroup = vDefinitionItem.myProductTypeGroup)) and (vComponent = vOverideComponent or (vComponent.mIsActive or vAllowInactiveComponent)) then
 				vCompFound := true;
 				vActualBucket := vComponent.allTxnBuckets[vDefinitionItem.myTxnBucketDefinition];
 				// why was myLender added as a pamaeter ehre?

 			vAllowInactiveComponent := self.enStatus = KN_PAIDOUT and (pTxnDefinition.mIsFeeCharge or pTxnDefinition.misCollectionCharge or pTxnDefinition.mIsCreditFeeOrCollectionCost) and app.myLender.mySystemFlag.mGetValueBoolean(SystemFlag.FLAG_SERV_COLLECTION_COST_FEES_FOR_PAIDOUT);
 			// HTB-134 BrandonS 04Jan21 {123282} : allow use of inactive component if vAllowInactiveComponent is true
 			if (vComponent.mGetProduct = vDefinitionItem.myServicingProduct or (vDefinitionItem.myProductTypeGroup <> null and vComponent.mGetProduct.myProductTypeGroup = vDefinitionItem.myProductTypeGroup)) and (vComponent = vOverideComponent or (vComponent.mIsActive or vAllowInactiveComponent)) then
+				// #HTB-1347 MarkusJ 22Jun22 {124475} : Check if mortgage component is latest for inactive loans
+				if vComponent.mIsMortgageComponent and vAllowInactiveComponent and not vComponent.mIsActive then
+					if vComponent <> mGetLatestMortgageComponentByID then
+						continue;
+					endif;
+				endif;
 				vCompFound := true;
 				vActualBucket := vComponent.allTxnBuckets[vDefinitionItem.myTxnBucketDefinition];
 				// why was myLender added as a pamaeter ehre?

C://PATCH_CONTROL//FROM/Account_mHasPledgedAccounts.txt ADDED Viewed

	@@ -0,0 +1,7 @@

+mHasPledgedAccounts(): Boolean;
+vars
+begin
+	return myUnderwritingData.getPledgedAccount <> null;
+end;

C://PATCH_CONTROL//FROM/Account_virtHasPledgedAccount.txt ADDED Viewed

	@@ -0,0 +1,10 @@

+virtHasPledgedAccount(set: Boolean; _value: Boolean io) mapping;
+begin
+	if set then
+		// set code here
+	else
+		_value := mHasPledgedAccounts;
+	endif;
+end;

C://PATCH_CONTROL//{TO → FROM}/AdminCalculator_mInitInst_InvestorType.txt RENAMED Viewed

@@ -65,8 +65,8 @@ begin
 															mGetTerminology(TT_LINE_OF_BUSINESS, vVal.at(9)),
 															vVal.at(11).Boolean,
 															false,
-															false // // #HTB-1315 ThabanS 14Feb22 {124196} :  added chkUseInvestorBankFund
-															);
 			elseif vVal.at(1) = "LOCALE" then
 				create	vLocale transient;
@@ -82,8 +82,8 @@ begin
 															null, null, null, null,
 															vVal.at(11).Boolean,
 															false,
-															false // // #HTB-1315 ThabanS 14Feb22 {124196} :  added chkUseInvestorBankFund
-															);
 			elseif vVal.at(1) = "PAYMENT" then
 				// #12561 MarkusJ 11Dec19 {122644} : Changed to InvestorTypeBucketDefinitionLinkDict
 				create vTxnBucket transient;

 															mGetTerminology(TT_LINE_OF_BUSINESS, vVal.at(9)),
 															vVal.at(11).Boolean,
 															false,
+															false, // // #HTB-1315 ThabanS 14Feb22 {124196} :  added chkUseInvestorBankFund
+															null);
 			elseif vVal.at(1) = "LOCALE" then
 				create	vLocale transient;
 															null, null, null, null,
 															vVal.at(11).Boolean,
 															false,
+															false, // // #HTB-1315 ThabanS 14Feb22 {124196} :  added chkUseInvestorBankFund
+															null);
 			elseif vVal.at(1) = "PAYMENT" then
 				// #12561 MarkusJ 11Dec19 {122644} : Changed to InvestorTypeBucketDefinitionLinkDict
 				create vTxnBucket transient;

C://PATCH_CONTROL//{TO → FROM}/AdminCalculator_mInitLender_FeeCode.txt RENAMED Viewed

@@ -68,6 +68,7 @@ begin
 				// #HTB-101 ThabanS 19May20 {122903} : added locale params
 				// #HTB-1355 MarkusJ 12Apr22 {124293} : added FeeCodeInvestorTypeLinks -> null here
 				app.myGeneralTxnAgent.trxUpdateFeeCode( vFeeCode,
 														null,
 														vVal.at(2).trimBlanks,
@@ -105,7 +106,8 @@ begin
 														app.mGetTerminology(TT_FEE_MULTIPLY_TERM, vVal.at(17)),
 														// #CTC-419 ChristopherD 04Dec20 {123305} : Get the new property aFullyAmortizeOnSaleToInvestor
 														vVal.at(30).Boolean,
-														null);
 			endif;
 		endif;

 				// #HTB-101 ThabanS 19May20 {122903} : added locale params
 				// #HTB-1355 MarkusJ 12Apr22 {124293} : added FeeCodeInvestorTypeLinks -> null here
+				//#HTB-1433 SaulL 04Nov22 {124813}: Adding a new property, aNotIncludedInAdvStm -> true here
 				app.myGeneralTxnAgent.trxUpdateFeeCode( vFeeCode,
 														null,
 														vVal.at(2).trimBlanks,
 														app.mGetTerminology(TT_FEE_MULTIPLY_TERM, vVal.at(17)),
 														// #CTC-419 ChristopherD 04Dec20 {123305} : Get the new property aFullyAmortizeOnSaleToInvestor
 														vVal.at(30).Boolean,
+														null,
+														true);
 			endif;
 		endif;

C://PATCH_CONTROL//{TO → FROM}/AdvanceStatementCalculator_mGetTotals.txt RENAMED Viewed

@@ -88,8 +88,22 @@ begin
 	endif;
 	//Ticket 9971 - AlexanderV - 2018-08-28
-	foreach vDeduction in pAdvanceItem.allBaseFundingDeductions where vDeduction.mIsAdvanceDeduction(myAdvanceStatementDetails) do
 		if pDeductions <> null  then
 			pDeductions.mAddItem(vDeduction, vDeduction.mDisplayRowDeductionsTable( myAdvanceStatementDetails, myAdvanceStatementDetails.mIsAddToLoan));
 		endif;

 	endif;
 	//Ticket 9971 - AlexanderV - 2018-08-28
+	// #HTB-1433 SaulL 04Nov22 {124813}: Do not display the Fee Code if its aNotIncludedInAdvStm is true
+	foreach vDeduction in pAdvanceItem.allBaseFundingDeductions where vDeduction.isKindOf(FeeCodeDeductionOrDisburse)
+	and vDeduction.mIsAdvanceDeduction(myAdvanceStatementDetails)
+	and not vDeduction.FeeCodeDeductionOrDisburse.myFeeCode.mGetANotIncludedInAdvStm
+	do
+		if pDeductions <> null  then
+			pDeductions.mAddItem(vDeduction, vDeduction.mDisplayRowDeductionsTable( myAdvanceStatementDetails, myAdvanceStatementDetails.mIsAddToLoan));
+		endif;
+		pTotalAdvanceDeductions := pTotalAdvanceDeductions + vDeduction.mGetAmount;
+	endforeach;
+	// #HTB-1433 SaulL 04Nov22 {124813}: For vDeduction is not Fee Code, use the previous logic
+	foreach vDeduction in pAdvanceItem.allBaseFundingDeductions where not vDeduction.isKindOf(FeeCodeDeductionOrDisburse) and
+	vDeduction.mIsAdvanceDeduction(myAdvanceStatementDetails)
+	do
 		if pDeductions <> null  then
 			pDeductions.mAddItem(vDeduction, vDeduction.mDisplayRowDeductionsTable( myAdvanceStatementDetails, myAdvanceStatementDetails.mIsAddToLoan));
 		endif;

C://PATCH_CONTROL//{TO → FROM}/AdvanceStatementFormHelp_mCalculateNetAdvance.txt RENAMED Viewed

@@ -15,7 +15,8 @@ vars
 begin
 	vAmount := myAdvanceStatementDetails.aCommitmentAmount;
-	foreach vBaseFundingHoldbackDisburse in pAdvanceScheduleItem.allBaseFundingDeductions do
 		if vBaseFundingHoldbackDisburse.isKindOf(ClawbackDisbursement) then
 			vAmount := vAmount + vBaseFundingHoldbackDisburse.mGetAmount;
@@ -23,11 +24,20 @@ begin
 		endif;
 		//Ticket 9971 - AlexanderV - 2018-06-26 - added receipt handling
-		if vBaseFundingHoldbackDisburse.isKindOf(FeeCodeDeductionOrDisburse) and not vBaseFundingHoldbackDisburse.mIsLenderPays(pAdvanceDetails) then
 			vAmount := vAmount + vBaseFundingHoldbackDisburse.FeeCodeDeductionOrDisburse.mGetTxnTotal(pAdvanceScheduleItem.myAccount);
 			vAmount := vAmount - vBaseFundingHoldbackDisburse.mGetAmount;
 		elseif vBaseFundingHoldbackDisburse.mIsAdvanceDeduction(pAdvanceDetails) or vBaseFundingHoldbackDisburse.mIsCommitmentDeduction then
 			vAmount := vAmount - vBaseFundingHoldbackDisburse.mGetAmount;
 		endif;
 	endforeach;

 begin
 	vAmount := myAdvanceStatementDetails.aCommitmentAmount;
+	foreach vBaseFundingHoldbackDisburse in pAdvanceScheduleItem.allBaseFundingDeductions
+	do
 		if vBaseFundingHoldbackDisburse.isKindOf(ClawbackDisbursement) then
 			vAmount := vAmount + vBaseFundingHoldbackDisburse.mGetAmount;
 		endif;
 		//Ticket 9971 - AlexanderV - 2018-06-26 - added receipt handling
+		if vBaseFundingHoldbackDisburse.isKindOf(FeeCodeDeductionOrDisburse) and not vBaseFundingHoldbackDisburse.mIsLenderPays(pAdvanceDetails)
+		// #HTB-1433 SaulL 07Nov22 {124813}: If Fee Code is setup as Not Included in Advance = true in Admin, do not calculate it
+		and not vBaseFundingHoldbackDisburse.FeeCodeDeductionOrDisburse.myFeeCode.mGetANotIncludedInAdvStm
+		then
 			vAmount := vAmount + vBaseFundingHoldbackDisburse.FeeCodeDeductionOrDisburse.mGetTxnTotal(pAdvanceScheduleItem.myAccount);
 			vAmount := vAmount - vBaseFundingHoldbackDisburse.mGetAmount;
+		// #HTB-1433 SaulL 07Nov22 {124813}: As the second elseif will be executed if the Fee Code is Client Pays no matter what, add a new elseif to bypass it
+		elseif vBaseFundingHoldbackDisburse.isKindOf(FeeCodeDeductionOrDisburse) and not vBaseFundingHoldbackDisburse.mIsLenderPays(pAdvanceDetails)
+		and vBaseFundingHoldbackDisburse.FeeCodeDeductionOrDisburse.myFeeCode.mGetANotIncludedInAdvStm then
+			continue;
+		// #HTB-1433 SaulL 07Nov22 {124813}:mIsCommitmentDeduction checked twice, positive way and negative way. So, no matter what, it'll execute for Client Pays Fee Code
 		elseif vBaseFundingHoldbackDisburse.mIsAdvanceDeduction(pAdvanceDetails) or vBaseFundingHoldbackDisburse.mIsCommitmentDeduction then
 			vAmount := vAmount - vBaseFundingHoldbackDisburse.mGetAmount;
 		endif;
 	endforeach;

C://PATCH_CONTROL//FROM/AnnualStatementAddress_mAnonymize.txt ADDED Viewed

	@@ -0,0 +1,67 @@

+mAnonymize(pConfigurator: AnonymizeConfigurator): Boolean updating;
+/*************************************************************************************************
+Date Created:	18 October 2022
+Created By:		MarkusJ
+Method Name:	mAnonymize
+Patch Number:	124733
+Ticket:			HTB-1482
+Purpose:		Anonymize Annual Statement Address (From Scratch Since No Client Link)
+Date	Ticket	Patch	Who			Description
+-------	------	------	-----------	--------------------------------------------------------------
+ddMMMyy
+*************************************************************************************************/
+vars
+	vAnonymizer : AnonymizeConfigurator;
+	vCanAnonymize : Boolean;
+	vFullAddress : String;
+	vName : String;
+	vCity : String;
+	vMailingAddress : String;
+	vPostalCode : String;
+	vProvince : String;
+	vIsPropertyAddress : Boolean;
+	vReceiveDoc : Boolean;
+	vAccountClient : AccountClient;
+	vAddress : Address;
+	vResult : Boolean;
+	vGeneratedAddress : Address;
+	vClient : Client;
+begin
+	vAnonymizer := pConfigurator;
+	vCanAnonymize := inheritMethod(vAnonymizer);
+	if not vCanAnonymize then
+		return false;
+	endif;
+	vResult := true;
+	vGeneratedAddress := vAnonymizer.generateStreetAddress;
+	vCity := aCity;
+	// #HTB-432 Gaurav 08Dec20 {123290} : Keep Postal Code anon rules consistent.
+	vPostalCode := aPostalCode[1:3].String & "0X0";
+	vProvince := aProvince;
+	vGeneratedAddress.mSetStandardDetails(vCity,app.mGetLMSRoot.allCountryCodes[KN_CANADA].allProvinces[vProvince],vPostalCode,vGeneratedAddress.myCountryNEW);
+	vFullAddress := vGeneratedAddress.mBuildAddress(CrLf,false);
+	vMailingAddress := vGeneratedAddress.mBuildAddress(" ",true);
+	vIsPropertyAddress := aIsPropertyAddr;
+	vName := myAnnualStatementData.aBorrowerNames;
+	mSetDetails(vFullAddress,
+		vName,
+		vCity,
+		vMailingAddress,
+		vPostalCode,
+		vProvince,
+		vIsPropertyAddress,
+		vReceiveDoc);
+	return vResult;
+epilog
+	//#10888 Gaurav 14Aug19 {122333} : Purge transients.
+	delete vGeneratedAddress;
+end;

C://PATCH_CONTROL//FROM/AnnualStatementData_mAnonymize.txt ADDED Viewed

	@@ -0,0 +1,43 @@

+mAnonymize(pConfigurator: AnonymizeConfigurator): Boolean updating;
+/*************************************************************************************************
+Date Created:	18 October 2022
+Created By:		MarkusJ
+Method Name:	mAnonymize
+Patch Number:	124733
+Ticket:			HTB-1482
+Purpose:		Anonymize AnnualStatementData (Client Names/ Addresses)
+Date	Ticket	Patch	Who			Description
+-------	------	------	-----------	--------------------------------------------------------------
+ddMMMyy
+*************************************************************************************************/
+vars
+	vAnonymizer : AnonymizeConfigurator;
+	vCanAnonymize : Boolean;
+	vResult : Boolean;
+	vAnnualStatementAddress : AnnualStatementAddress;
+begin
+	vAnonymizer := pConfigurator;
+	vCanAnonymize := inheritMethod(vAnonymizer);
+	if not vCanAnonymize then
+		return false;
+	endif;
+	//Client's are Anonymized at this point in heriarchy of Anonymizing
+	aBorrowerNames := mBuildClientNames(myAccount);
+	foreach vAnnualStatementAddress in allAddresses do
+		vAnnualStatementAddress.mAnonymize(vAnonymizer);
+	endforeach;
+	vResult := true;
+	return vResult;
+epilog
+end;

C://PATCH_CONTROL//{TO → FROM}/Company_class_info.txt RENAMED Viewed

@@ -161,7 +161,7 @@ Terminology Type:  CONTACT_TIME
 NAME:myPrimaryLanguage
 LEN:12
-PrimaryLanguage
 Terminology Type:  LANGUAGE

 NAME:myPrimaryLanguage
 LEN:12
+Contact Language
 Terminology Type:  LANGUAGE

C://PATCH_CONTROL//{TO → FROM}/Contact_class_info.txt RENAMED Viewed

@@ -161,7 +161,7 @@ Terminology Type:  CONTACT_TIME
 NAME:myPrimaryLanguage
 LEN:12
-PrimaryLanguage
 Terminology Type:  LANGUAGE

 NAME:myPrimaryLanguage
 LEN:12
+Contact Language
 Terminology Type:  LANGUAGE

C://PATCH_CONTROL//FROM/CoreCombo_mRemoveItem.txt ADDED Viewed

	@@ -0,0 +1,18 @@

+mRemoveItem(pLabel 		: String) updating;
+/*************************************************************************************************
+Date Created:		19 July 2022
+Created By:			NormanA
+Method Name:		mRemoveItem
+Patch Number:		124533
+Ticket:				HTB-1317
+Purpose:			Remove an Item from itemObject drop down list
+Date    Ticket    Patch    Who              Description
+-------    ------    ------    ------------  --------------------------------------------------------------
+*************************************************************************************************/
+vars
+	vIdx :	Integer;
+begin
+	vIdx := findString(1, pLabel);
+	removeItem(vIdx);
+end;

C://PATCH_CONTROL//{TO → FROM}/CoreCurrencyTextBox_mPositionCurrencyLabel.txt RENAMED Viewed

@@ -26,7 +26,8 @@ begin
 		myCurrencyLabel.left := left - 10;
 		myCurrencyLabel.top := top + 2;
-		if not myCurrencyLabel.visible or not aDisplayCurrencySymbol then
 			myCurrencyLabel.left := -100;
 			myCurrencyLabel.top := -100;
 		endif;

 		myCurrencyLabel.left := left - 10;
 		myCurrencyLabel.top := top + 2;
+		// #12483 JustinS 08Oct19 {122521} : added visibility check for field so dollar sign only appears when field is visible
+		if not myCurrencyLabel.visible or not aDisplayCurrencySymbol or not visible then
 			myCurrencyLabel.left := -100;
 			myCurrencyLabel.top := -100;
 		endif;

C://PATCH_CONTROL//{TO → FROM}/CoreDateTextBox_paint.txt RENAMED Viewed

@@ -12,7 +12,9 @@ begin
 		endif;
 		myButton.parent := parent ;
 		myButton.visible := visible;
 //		if visible and aButtonDisplayed and aButtonPicture <> null then
 //			if not isInPainter and not rButton.visible then

 		endif;
 		myButton.parent := parent ;
+		if myButton.visible <> visible then
 		myButton.visible := visible;
+		endif;
 //		if visible and aButtonDisplayed and aButtonPicture <> null then
 //			if not isInPainter and not rButton.visible then

C://PATCH_CONTROL//{TO → FROM}/CoreSchema_mDoCommitActions.txt RENAMED Viewed

@@ -22,7 +22,8 @@ begin
 		//10965 - ThabanS - 21Nov2018c
 		if not app.mIsEnvironmentProduction and app.myCnLog <> null and allCommitPrimary.size > 0 then
 			vLog := true;
-			app.myCnLog.log(app.actualTime.display & Tab & app.name & Tab & app.userName & Tab & ' mCommitAction Start');
 			app.myCnLog.log(process.getCallStackInfo);
 		endif;

 		//10965 - ThabanS - 21Nov2018c
 		if not app.mIsEnvironmentProduction and app.myCnLog <> null and allCommitPrimary.size > 0 then
 			vLog := true;
+			//ChristopherD #HTB-43 14-01-2020 {122715} : Thaban suggested that removing this line is fine, and it does fix it.
+			//app.myCnLog.log(app.actualTime.display & Tab & app.name & Tab & app.userName & Tab & ' mCommitAction Start');
 			app.myCnLog.log(process.getCallStackInfo);
 		endif;

C://PATCH_CONTROL//{TO → FROM}/CoreSchema_mJadeBatchExtract.txt RENAMED Viewed

@@ -4,7 +4,7 @@ mJadeBatchExtract(patch : String) serverExecution;
 //
 //	Purpose	:	Instructs jade to perform a batch extract of provided patches on the server.
 //
-//	Notes	:	mJadeBatchExtract:
 //
 //	Date                Who         Bug#    Description
 //  -------             ---         -----   ------------------------------------------------------------------------
@@ -38,7 +38,12 @@ vars
 	//Gaurav 18-10-2018 : Variable to store intermediate log messages.
 	message : String;
 begin
 	//Gaurav 18-10-2018 : Open log file again on this node.
 	log := mCreateLogFileServer('E:\PatchExtracts\', 'RemotePatchExtractLog');
@@ -144,6 +149,7 @@ begin
 	//Gaurav 15-10-2018 : Cleaned up implementation. Sectioned implementation into more concise logical segments.
 	cmdLine := batchFileName;
 	cmdLine.mAppendv2(patch,null,true);
 	//Gaurav 05-10-2018 : Invoke server process and await completion in order to complete creation of necessary files.
 	result := app.mRunCommandLineDB(cmdLine, true);

 //
 //	Purpose	:	Instructs jade to perform a batch extract of provided patches on the server.
 //
+//	Notes	:	mJadeBatchExtract:  OK TO PROMOTE
 //
 //	Date                Who         Bug#    Description
 //  -------             ---         -----   ------------------------------------------------------------------------
 	//Gaurav 18-10-2018 : Variable to store intermediate log messages.
 	message : String;
+	// MarkusJ 24May19 {122249} : Server name parameter for name of current server
+	serverNameArgument : String;
 begin
+	serverNameArgument := "DEV_HTB_DB";
 	//Gaurav 18-10-2018 : Open log file again on this node.
 	log := mCreateLogFileServer('E:\PatchExtracts\', 'RemotePatchExtractLog');
 	//Gaurav 15-10-2018 : Cleaned up implementation. Sectioned implementation into more concise logical segments.
 	cmdLine := batchFileName;
 	cmdLine.mAppendv2(patch,null,true);
+	cmdLine.mAppendv2(serverNameArgument,null,true);
 	//Gaurav 05-10-2018 : Invoke server process and await completion in order to complete creation of necessary files.
 	result := app.mRunCommandLineDB(cmdLine, true);

C://PATCH_CONTROL//FROM/CoreSchema_mRemotePatchCopy.txt ADDED Viewed

	@@ -0,0 +1,179 @@

+mRemotePatchCopy(patch : String; environment : String) serverExecution;
+//
+//	Created	:	09 October 2018 by Gaurav Chaudhari
+//
+//	Purpose	:	Copies patch extracts remotely to different networked servers.
+//
+//	Notes	:	mRemotePatchCopy:
+//
+//	Date                Who         Bug#    Description
+//  -------             ---         -----   ------------------------------------------------------------------------
+//	09-10-2018			Gaurav				Dev Enhancement - Remote Patch Extracts
+vars
+	copyBatchFile : File;
+	copyBatchFileName : String;
+	cmdLine : String;
+	sourcePath : String;
+	destination : String;
+	log : File;
+	result : Integer;
+	//Gaurav 23-10-2018
+	message : String;
+	date : String;
+	time : String;
+	//Gaurav 06-11-2018
+	environmentName : String;
+	//Gaurav 13-11-2018
+	dropboxPath : String;
+begin
+	//Gaurav 18-10-2018 : Open log file again on this node.
+	log := mCreateLogFileServer('E:\PatchExtracts\', 'RemotePatchExtractLog');
+	//Gaurav 09-10-2018 : Mapped remote patch extract batch file.
+	create copyBatchFile transient;
+	copyBatchFileName := 'E:\PatchExtracts\GauravPatchCopy.bat';
+	copyBatchFile.fileName := copyBatchFileName;
+	sourcePath := "E:\PatchExtracts\" & patch;
+	//Gaurav 18-10-2018 : Set the full destination path for the copy task.
+	//Gaurav 29-10-2018 : Format the output directory to retain copy information.
+	date := app.mGetSystemDate.format('yyyyMMdd');
+	time := app.mGetSystemTime.format('HHmmss');
+	//Gaurav 29-10-2018 : Format Output directory path with date/time information.
+	//Gaurav 06-11-2018 : Adjust destination path to route to global Release folder on Azure.
+	//Gaurav 09-11-2018 : Testing for W1/d360db03 configurations.
+	//Gaurav 13-11-2018 : Dropbox build path integration included.
+	environment.mStripLastDirectory2(environmentName);
+	destination := environment.mGetBaseDirectory;
+	dropboxPath := 'E:\Dropbox\'; //Base directory path.
+	//Gaurav 13-11-2018 : Added dropbox path.
+	destination.mAppendv2('Release\',null,false);
+	dropboxPath.mAppendv2('Release\',null,false);
+	destination.mAppendv2(environmentName & '\',null,false);
+	dropboxPath.mAppendv2(environmentName & '\',null,false);
+	//destination := environment;
+	destination.mAppendv2(patch,null,false);
+	destination.mAppendv2(date,DELIM_HYPHEN,false);
+	destination.mAppendv2(time,DELIM_HYPHEN,false);
+	//Gaurav 13-11-2018 : Add patch information to dropbox path.
+	dropboxPath.mAppendv2(patch,null,false);
+	dropboxPath.mAppendv2(date,DELIM_HYPHEN,false);
+	dropboxPath.mAppendv2(time,DELIM_HYPHEN,false);
+	cmdLine := copyBatchFileName;
+	cmdLine.mAppendv2(sourcePath,null,true);
+	cmdLine.mAppendv2(destination,null,true);
+	//Gaurav  01-11-2018 : TEST Network Errors.
+	//cmdLine.mAppendv2('C:\Temp\DEV\999999',null,true);
+	//foreach environment in environments do
+		/*Gaurav 23-10-2018 : Path resolution testing successful.
+		mLog(log,'--');
+		mLog(log,'Environment: ' & environment);
+		//Gaurav 06-11-2018 : Test path adjustments for destination path.
+		mLog(log,'EnvironmentName: ' & environmentName);
+		mLog(log,'Patch: ' & patch);
+		mLog(log,'Destination: ' & destination);
+		mLog(log,'CmdLine: ' & cmdLine);
+		mLog(log,'--');
+		//Gaurav 23-10-2018*/
+	//Gaurav 29-10-2018 : Code segment enables RemotePatchCopy for Azure.
+	//Gaurav 18-10-2018 : Use provided information and kick off process on server to copy.
+	result := app.mRunCommandLineDB(cmdLine, true);
+	//Gaurav 06-11-2018 : Testing for destination path modifications.
+	//result := 1;
+	//Gaurav 15-10-2018 : CommandLine external process node errors.
+	if result = node.ExternalProcess_InvalidParam then
+		message := "Something is wrong with node.createExternalProcess arguments";
+	elseif result = node.ExternalProcess_InitiateFailed then
+		message := "Could not start " & cmdLine;
+	elseif result = node.ExternalProcess_InitiateOK then
+		//Gaurav 23-10-2018 : Successful Copy. Log success message in log.
+		message := 'Patch #' & patch & ' copied to "' & destination & '"';
+	elseif result = node.ExternalProcess_Failed then
+		message := "Modal command '" & cmdLine & "' started, but died under abnormal conditions";
+	elseif result = node.ExternalProcess_Successful then
+		message := "Modal command '" & cmdLine & "' started, and exited with " & result.String & " (ExternalProcess_Successful)";
+	endif;
+	//Gaurav 15-10-2018//
+	//Gaurav 23-10-2018 : External process node feedback into log files.
+	write message;
+	mLog(log,message);
+	//Gaurav 29-10-2018//
+	//Gaurav 13-11-2018 : Move the corresponding patch files over to Dropbox directory as well.
+	cmdLine := '';
+	cmdLine := copyBatchFileName;
+	cmdLine.mAppendv2(sourcePath,null,true);
+	cmdLine.mAppendv2(dropboxPath,null,true);
+	//Gaurav 13-11-2018 : Exec dropbox copy.
+	result := app.mRunCommandLineDB(cmdLine, true);
+	//Gaurav 15-10-2018 : CommandLine external process node errors.
+	if result = node.ExternalProcess_InvalidParam then
+		message := "Something is wrong with node.createExternalProcess arguments";
+	elseif result = node.ExternalProcess_InitiateFailed then
+		message := "Could not start " & cmdLine;
+	elseif result = node.ExternalProcess_InitiateOK then
+		//Gaurav 13-11-2018 : Successful Copy to Dropbox location.
+		message := 'Patch #' & patch & ' copied to "' & dropboxPath & '"';
+	elseif result = node.ExternalProcess_Failed then
+		message := "Modal command '" & cmdLine & "' started, but died under abnormal conditions";
+	elseif result = node.ExternalProcess_Successful then
+		message := "Modal command '" & cmdLine & "' started, and exited with " & result.String & " (ExternalProcess_Successful)";
+	endif;
+	//Gaurav 15-10-2018//
+	//Gaurav 13-11-2018 : Log the dropbox copy into primary logging file.
+	write message;
+	mLog(log,message);
+	//Gaurav 13-11-2018//
+	//Gaurav 13-11-2018 : Automatic archive/compression of files.
+	//TODO IF REQ: Sample commandline argument to trigger automatic archival of directories contents.
+	cmdLine := '"C:\Program Files\7-Zip\7z.exe" a 121619.7z E:\Dropbox\Release\WealthOne_QA_DB\121619-20181113-105738\*';
+		//Gaurav 18-10-2018 : Add logging HERE.
+		//cmdLine.mStripLastDirectory
+		//app.mRunCommandLineDB(,true);
+		//destination := environment & patch;
+		//app.mRunCommandLineDB('echo destPath: ' & destination & ' >> D:\PatchExtracts\test.txt',true);
+		//cmdLine := copyBatchFileName & DELIM_SINGLESPACE &
+			//sourcePath & DELIM_SINGLESPACE &
+			//environment;
+		//cmdLine.mAppendv2(destinationPath & "'",null,true);
+		//cmdLine.mAppendv2(xcopyArgs,null,true);
+		//works
+		//'D:\PatchExtracts\GauravPatchCopy.bat D:\PatchExtracts\121458 \\10.10.210.39\e$\~Enviroments\DELTA_QA_Q1_DB\Release\121458'
+		//app.mRunCommandLineDB(cmdLine,false);
+	//endforeach;
+	//Gaurav 18-10-2018 : Always close log file prior to leaving the node.
+	log.close;
+epilog
+end;

C://PATCH_CONTROL//{TO → FROM}/CoreSchema_mSendMailv3.txt RENAMED Viewed

@@ -25,7 +25,10 @@ vars
 	vFriendly,vFrom,vTo : String;
 	vCode : Integer;
 	vDotNetSecurityProtocolString : String;
 begin
 	if app.myOperationControl = null then
@@ -69,9 +72,9 @@ begin
 								pReplyTo.StringUtf8,
 								pFiles.StringUtf8,
 								pIsHTML,
-								//#HTB-1423 SaulL 04Apr22 {124300}: Bring in LMS-278
-								//LMS-278 BrandonS 04May21 {123650}: Get the protocol string from the ini file and pass it
-								//Delta360.Commons will accept as a string and parse to needed type, must use SecurityProtocolType enum types, ex 'Ssl3'
 								vDotNetSecurityProtocolString.StringUtf8).String;
 	write vError;

 	vFriendly,vFrom,vTo : String;
 	vCode : Integer;
+	// #HTB-1423 SaulL 04Apr22 {124300}: Bring in LMS-278
+	//LMS-278 BrandonS 04May21 {123650} : get the protocol string from the ini file and pass it. Delta360.Commons will accept as a string and parse to needed type, must use SecurityProtocolType enum types, ex 'Ssl3'.
 	vDotNetSecurityProtocolString : String;
 begin
 	if app.myOperationControl = null then
 								pReplyTo.StringUtf8,
 								pFiles.StringUtf8,
 								pIsHTML,
+								//// #HTB-1423 SaulL 04Apr22 {124300}: Bring in LMS-278
+								//LMS-278 BrandonS 04May21 {123650} : get the protocol string from the ini file and pass it.
+								//Delta360.Commons will accept as a string and parse to needed type, must use SecurityProtocolType enum types, ex 'Ssl3'.
 								vDotNetSecurityProtocolString.StringUtf8).String;
 	write vError;

C://PATCH_CONTROL//{TO → FROM}/CoreTextBox_visible.txt RENAMED Viewed

@@ -13,18 +13,18 @@ vars
 begin
 	inheritMethod( set, value);
-	//JADE 2018 FIX - OK TO PROMOTE
 	if app.name = "Jade" then return; endif;
-	visible := value;
 	if set then
-		if myCoreLabel <> null then
 			myCoreLabel.visible := value;
 		endif;
 	endif;
 		paint(self);
 epilog
 end;

 begin
 	inheritMethod( set, value);
 	if app.name = "Jade" then return; endif;
 	if set then
+		visible := value;
+		if myCoreLabel <> null and myCoreLabel.visible <> value then
 			myCoreLabel.visible := value;
 		endif;
 	endif;
+	if set then
 		paint(self);
+	endif;
 epilog
 end;

C://PATCH_CONTROL//{TO → FROM}/Division_class_info.txt RENAMED Viewed

@@ -225,7 +225,7 @@ LEN:12
 NAME:myDivisionType
 LEN:12
 NAME:myLender

 NAME:myDivisionType
 LEN:12
+Divisions
 NAME:myLender

C://PATCH_CONTROL//{TO → FROM}/Employee_class_info.txt RENAMED Viewed

@@ -240,7 +240,7 @@ LEN:12
 NAME:allDivision
 LEN:12
-Legacy1
 NAME:allDivisionsByType

 NAME:allDivision
 LEN:12
 NAME:allDivisionsByType

C://PATCH_CONTROL//{TO → FROM}/FeeCode_class_info.txt RENAMED Viewed

@@ -149,6 +149,16 @@ LEN:1
 NAME:aParamsJSON
 LEN:-1
 JSON Params

+NAME:aNotIncludedInAdvStm
+LEN:1
+Not Included in Advance Statement
+Date Created:	04 November 2022
+Created By:		SaulL
+Property Name:	aNotIncludedInAdvStm
+Patch Number:	124813
+Ticket:			HTB-1433
+Purpose:		To indidcate whether the fee code should be included in the Advance Statement
 NAME:aParamsJSON
 LEN:-1
 JSON Params

C://PATCH_CONTROL//FROM/FeeCode_mGetANotIncludedInAdvStm.txt ADDED Viewed

	@@ -0,0 +1,19 @@

+mGetANotIncludedInAdvStm() : Boolean;
+/*************************************************************************************************
+Date Created:    04 November 2022
+Created By:        SaulL
+Method Name:    mGetANotIncludedInAdvStm
+Patch Number:    124813
+Ticket:            HTB-1433
+Purpose:        Getter method for aNotIncludedInAdvStm
+Date    Ticket    Patch    Who            Description
+-------    ------    ------    -----------    --------------------------------------------------------------
+ddMMMyy
+*************************************************************************************************/
+vars
+begin
+    return aNotIncludedInAdvStm;
+epilog
+end;

C://PATCH_CONTROL//{TO → FROM}/FeeCode_mSetDetails.txt RENAMED Viewed

@@ -32,7 +32,9 @@ mSetDetails(	pName				: String;
 				// #HTB-738 MichaelS 20Jan21 {123422} : Add new multiply term type
 				pMultiplyTerm		: Terminology;
 				// #CTC-419 ChristopherD 30Nov20 {123305} : Adding to a new attribute
-				pFullyAmortizeOnSaleToInvestor : Boolean) updating;
 //
 //	Created	:	18 February 2016 by ThabanS
@@ -43,7 +45,7 @@ mSetDetails(	pName				: String;
 //
 //	Date                 Who          Bug#     Description
 //  -------              ---          -----   ------------------------------------------------------------------------
-//
 vars
 	vObjectsKeep,vObjDel : ObjectArray;
@@ -77,6 +79,8 @@ begin
 	aAutoAddFeeOnFund		:= pAutoAddOnFund;
 	aRestrictByRole			:= pRestrictByRole;
 	aInlcudeInAPR			:= pIncludeinAPR;
 	// #HTB-1355 MarkusJ 25Apr22 {124293} : DEPRICATED ATTRIBUTE aFullyAmortizeOnSaleToInvestor
 	// #CTC-419 ChristopherD 30Nov20 {123305} : Adding to a new attribute

 				// #HTB-738 MichaelS 20Jan21 {123422} : Add new multiply term type
 				pMultiplyTerm		: Terminology;
 				// #CTC-419 ChristopherD 30Nov20 {123305} : Adding to a new attribute
+				pFullyAmortizeOnSaleToInvestor : Boolean;
+				// #HTB-1433 SaulL 04Nov22 {124813}: Adding a new property, aNotIncludedInAdvStm
+				pNotIncludedInAdvStm	: Boolean) updating;
 //
 //	Created	:	18 February 2016 by ThabanS
 //
 //	Date                 Who          Bug#     Description
 //  -------              ---          -----   ------------------------------------------------------------------------
+//  04Nov22				SaulL		HTB-1433	add another property - aNotIncludedInAdvStm
 vars
 	vObjectsKeep,vObjDel : ObjectArray;
 	aAutoAddFeeOnFund		:= pAutoAddOnFund;
 	aRestrictByRole			:= pRestrictByRole;
 	aInlcudeInAPR			:= pIncludeinAPR;
+	//#HTB-1433 SaulL 04Nov22 {124813}: Adding a new property, aNotIncludedInAdvStm
+	aNotIncludedInAdvStm	:= pNotIncludedInAdvStm;
 	// #HTB-1355 MarkusJ 25Apr22 {124293} : DEPRICATED ATTRIBUTE aFullyAmortizeOnSaleToInvestor
 	// #CTC-419 ChristopherD 30Nov20 {123305} : Adding to a new attribute

C://PATCH_CONTROL//{TO → FROM}/FinancialTxnAgent_trxCreateGLTxn.txt RENAMED Viewed

@@ -20,7 +20,7 @@ vars
 	vAudit:		AuditManager;
 begin
 	//app.mWrite('ThabanS', CrLf & method.name & " Start" & CrLf);
-	if pGLAccountCode <> null and pAction <> null then
 		app.mWrite('ThabanS', "GL Create for " & pGLAccountCode.aName & Tab & pAction.mGetKeyName & Tab & pAmount.display);
 	endif;

 	vAudit:		AuditManager;
 begin
 	//app.mWrite('ThabanS', CrLf & method.name & " Start" & CrLf);
+	if pGLAccountCode <> null then
 		app.mWrite('ThabanS', "GL Create for " & pGLAccountCode.aName & Tab & pAction.mGetKeyName & Tab & pAmount.display);
 	endif;

C://PATCH_CONTROL//{TO → FROM}/FinancialTxnAgent_trxPostPaymentRealization.txt RENAMED Viewed

@@ -246,9 +245,11 @@ begin
 				//if vServicingComponent.mGetProduct.mGetCompoundFrequencyType(true) <> KN_CMPD_FREQ_MONTHLY then
 					if vServicingComponent.mIsMortgageComponent then
 						vAccrualDetail := vServicingComponent.mGetAccrualDetails;
 						// #HTB-1065 DarrellB 07-June-22 {124328}: add fee accrual
 						//9966 - ThabanS - 18May2018 - add standby
-						trxUpdateLendingCompAccrual(vServicingComponent.MortgageComponent, vAccrualDetail.aAccruedUpToDate, 0.00, 0.00, 0, false, 0.00);
 					endif;
 				//endif;
 			endif;
@@ -297,7 +298,8 @@ begin
 					0,
 					0,
 					false,
-					null);
 			endif;
 		endforeach;

 				//if vServicingComponent.mGetProduct.mGetCompoundFrequencyType(true) <> KN_CMPD_FREQ_MONTHLY then
 					if vServicingComponent.mIsMortgageComponent then
 						vAccrualDetail := vServicingComponent.mGetAccrualDetails;
+						// #HTB-1603 DarrellB 22-September-22 {124692}: don't clear fee interest
 						// #HTB-1065 DarrellB 07-June-22 {124328}: add fee accrual
 						//9966 - ThabanS - 18May2018 - add standby
+						//trxUpdateLendingCompAccrual(vServicingComponent.MortgageComponent, vAccrualDetail.aAccruedUpToDate, 0.00, 0.00, 0, false, 0.00);
+						trxUpdateLendingCompAccrual(vServicingComponent.MortgageComponent, vAccrualDetail.aAccruedUpToDate, 0.00, 0.00, 0, false, vAccrualDetail.getAccruedFeeInterest);
 					endif;
 				//endif;
 			endif;
 					0,
 					0,
 					false,
+					// #HTB-1603 DarrellB 22-September-22 {124692}: don't clear fee interest
+					vExtComp.myAccrualDetails.getAccruedFeeInterest);
 			endif;
 		endforeach;

C://PATCH_CONTROL//{TO → FROM}/FinancialTxnAgent_trxRealizeFeeInterest.txt RENAMED Viewed

@@ -48,6 +48,7 @@ vars
 	// #HTB-1065 DarrellB 07-June-22 {124328}
 	vFeeAccrual			: Decimal[17,5];
 begin
 	mInitTrxTransaction;
@@ -111,10 +112,37 @@ begin
 					endif;
 				endif;
 				vFeeIntPost := vFeeInterestAmt;
 				if vFeeIntPost < 0 then vFeeIntPost := 0; endif;
-				//is this correct?
 				vIsLatePymtInt := vFeeIntPost <> 0;
 				vAmounts.add(vFeeIntPost);
@@ -190,6 +218,9 @@ begin
 epilog
 	delete vTxnBuckets;
 	delete vAmounts;
 	return vFinancialTxn;
 end;

 	// #HTB-1065 DarrellB 07-June-22 {124328}
 	vFeeAccrual			: Decimal[17,5];
+	vArrears			: DecimalArray;
 begin
 	mInitTrxTransaction;
 					endif;
 				endif;
+				// #HTB-1603 MarkusJ 26Sep22 {124696} : Fix Backdated Fees/ Fee Accrual Start
+				if pAccount <> null then
+					create vArrears transient;
+					pAccount.mGetBackDatedArrears(pEffectiveDate, pTxnBuckets, vArrears);
+					vFeeInterestAmt := vFeeInterestAmt + vArrears[vIndex];
+				endif;
+				//Darrell Qs:
+				// #HTB-1603 DarrellB 23-September-22 {124692}: if there's been a backdated fee, we need to accrue fee interest to cover that
+				/* Doesn't Accrue Backdates, Accrued Date on Loan will be already at curent date
+				if pAccount <> null
+				and pAccount.mCalculateFeeInterest(pEffectiveDate) <> 0 then
+					vFeeInterestAmt := vFeeInterestAmt + pAccount.mCalculateFeeInterest(pEffectiveDate);
+				endif;
+				*/
+				// This doesn't work. vTxnCalc.allActualBucketsByHeiarchy is empty, so it returns 0 in mCalcArrearsDue_V2, and then I get a black box on the next line
+				// I don't know if what I'm trying to do is correct. How much accrued fee interest do we want to realize?
+				/*
+				create vTxnCalc transient;
+				vTxnCalc.mInit(pAccount.mySubLedger);
+				vTxnCalc.mSetTxnDefinition(KN_SYSTEM, BN_FEE_INTEREST, KN_DEBIT, TxnDefinitionServicing.class);
+				vTxnCalc.mCalcArrearsDue_V2(pEffectiveDate);
+				*/
+				// this might be double counted, and if the transaction is paying any of it, that will probably need to be subtracted too
+				// Or if it's from a backdated fee, do we want to post the full accrued amount?
+				//vFeeInterestAmt := vFeeInterestAmt + vTxnCalc.allArrearsDue[vIndex];
+				//END Darrell Qs
 				vFeeIntPost := vFeeInterestAmt;
 				if vFeeIntPost < 0 then vFeeIntPost := 0; endif;
+				// #HTB-1603 MarkusJ 26Sep22 {124696} : END
 				vIsLatePymtInt := vFeeIntPost <> 0;
 				vAmounts.add(vFeeIntPost);
 epilog
 	delete vTxnBuckets;
 	delete vAmounts;
+	// #HTB-1603 DarrellB 23-September-22 {124692}
+	delete vTxnCalc;
+	delete vArrears;
 	return vFinancialTxn;
 end;

C://PATCH_CONTROL//{TO → FROM}/FormCreatePoolingRun_initialize.txt RENAMED Viewed

@@ -12,6 +12,7 @@ vars
 	//vPool			: Pool;
 	vComponentSel	: ComponentSelection;
 	vDiff			: Decimal[ 12, 4];
 begin
@@ -27,7 +28,7 @@ begin
 	//cboPoolingPlan.listCollection( app.mySelectionRoot.allSecuritizationPlans, true, 0);
 	cboPoolingPlan.displayCollection( app.mySelectionRoot.allSecuritizationPlans, true, 0, null, POOL_CRITERIA_ONLY);
-	cboPoolingPlan.listIndex := 1;
 	//cboPoolingPlan.enabled := false;
 //	cboPackageSelect.displayCollection ( app.myLender.allPackages, true, 0, null, $Default_Inventory_Package);
@@ -93,6 +94,18 @@ begin
 		txtSearchLimit.text := vDiff.mDisplayWithoutTrailingZeros;//myCurrentLocale.mFormatCurrency( vDiff, false);
 	endif;
 	create allResults transient;
 	// 10093 MuhammadN 09Oct2018 - Changed to use method instead of checking keyname for "3rd Party MBS"

 	//vPool			: Pool;
 	vComponentSel	: ComponentSelection;
 	vDiff			: Decimal[ 12, 4];
+	vListIndex		: Integer;
 begin
 	//cboPoolingPlan.listCollection( app.mySelectionRoot.allSecuritizationPlans, true, 0);
 	cboPoolingPlan.displayCollection( app.mySelectionRoot.allSecuritizationPlans, true, 0, null, POOL_CRITERIA_ONLY);
+	//cboPoolingPlan.listIndex := 1;
 	//cboPoolingPlan.enabled := false;
 //	cboPackageSelect.displayCollection ( app.myLender.allPackages, true, 0, null, $Default_Inventory_Package);
 		txtSearchLimit.text := vDiff.mDisplayWithoutTrailingZeros;//myCurrentLocale.mFormatCurrency( vDiff, false);
 	endif;
+	// #HTB-1479 NormanA 03Nov22 {124658} : set the default pooling plan of the component in combo box
+	vListIndex := 1;
+	if vComponentSel <> null and vComponentSel.isKindOf(Pool) then
+		if vComponentSel.Pool.myInvestorType <> null and vComponentSel.Pool.myInvestorType.mGetDefaultPool <> null then
+		foreach vListIndex in 1 to cboPoolingPlan.getCollection.size do
+			cboPoolingPlan.listIndex := vListIndex;
+			if cboPoolingPlan.text = vComponentSel.Pool.myInvestorType.mGetDefaultPool then
+				break;
+			endif;
+		endforeach;
+		endif;
+	endif;
 	create allResults transient;
 	// 10093 MuhammadN 09Oct2018 - Changed to use method instead of checking keyname for "3rd Party MBS"

C://PATCH_CONTROL//{TO → FROM}/FormCreateTxn_mDoAction.txt RENAMED Viewed

@@ -240,11 +241,14 @@ begin
 					elseif vBucket.myComponent.mIsTaxComponent then
 						vAccrualDetail := vBucket.myComponent.TaxComponent.myAccrualDetails;
 					endif;
-					vFeeInterest := myAccount.mCalculateFeeInterest(vEffectiveDate);
 					if vAccrualDetail <> null
 					// is this line needed?
-					//and ((vBucket.aArrearsBalance <> vAccrualDetail.getAccruedFeeInterest or vBucket.aArrearsBalance <> vFeeInterest)
-					and (vAccrualDetail.getAccruedFeeInterest <> 0 or vFeeInterest <> 0) then
 						vRealizeFeeInterest := true;
 					endif;
 				endif;

 					elseif vBucket.myComponent.mIsTaxComponent then
 						vAccrualDetail := vBucket.myComponent.TaxComponent.myAccrualDetails;
 					endif;
+					// #HTB-1603 DarrellB 23-September-22 {124692}
+					//vFeeInterest := myAccount.mCalculateFeeInterest(vEffectiveDate);
+					vFeeInterest := myCalculator.allArrearsDue[vIndex];
 					if vAccrualDetail <> null
 					// is this line needed?
+					and ((vBucket.aArrearsBalance <> vAccrualDetail.getAccruedFeeInterest or vBucket.aArrearsBalance <> vFeeInterest)
+					and (vAccrualDetail.getAccruedFeeInterest <> 0 or vFeeInterest <> 0)) then
 						vRealizeFeeInterest := true;
 					endif;
 				endif;

C://PATCH_CONTROL//{TO → FROM}/FormCreateTxn_mValidate.txt RENAMED Viewed

@@ -52,7 +52,7 @@ begin
 		cboBankAccount.setFocus;
 	endif;
-	if vErrorMsg = null and txtAmount.mGetCurrencyFromText <= 0 and not cboFunds.listObject.FundsType.mGetKeyName.isOneOf(FUNDS_JOURNAL, FUNDS_CAPITALIZATION) and
 		not myTxnDefinition.myTxnType.aName = TXN_SKIP_PAYMENT
 		then
 		//vCode := 10388;

 		cboBankAccount.setFocus;
 	endif;
+	if vErrorMsg = null and txtAmount.mGetCurrencyFromText <= 0 and not cboFunds.listObject.FundsType.mGetKeyName.isOneOf(FUNDS_JOURNAL, FUNDS_CAPITALIZATION, FUNDS_TRANSFER) and
 		not myTxnDefinition.myTxnType.aName = TXN_SKIP_PAYMENT
 		then
 		//vCode := 10388;

C://PATCH_CONTROL//{TO → FROM}/FormEditAccountDetails_class_info.txt RENAMED Viewed

@@ -777,6 +777,11 @@ LEN:12
 NAME:shtETP
 LEN:12
@@ -822,6 +827,11 @@ LEN:12
 NAME:txtRetnGrade
 LEN:12

+NAME:lblPledgedAccount
+LEN:12
 NAME:shtETP
 LEN:12
+NAME:txtPledgedAccount
+LEN:12
 NAME:txtRetnGrade
 LEN:12

C://PATCH_CONTROL//{TO → FROM}/FormEditAccountDetails_mLoadDetails.txt RENAMED Viewed

@@ -52,6 +52,17 @@ begin
 		//9957
 		txtBranchCode.text := vAccount.myUnderwritingData.aBranchCode.display;
 	endif;
 	txtLoanID.text := vAccount.aAccountID;

 		//9957
 		txtBranchCode.text := vAccount.myUnderwritingData.aBranchCode.display;
+		// #HTB-1479 NormanA 25Sep22 {124658} : update Pledged Accoun
+		if vAccount.myUnderwritingData.getPledgedAccount <> null then
+			txtPledgedAccount.text := vAccount.myUnderwritingData.getPledgedAccount.mGetKeyName;
+		endif;
+		// debug
+		write "Underwriting? " & vAccount.mIsUWStatus.display;
+		write "CRO or CEO? " & (app.myUser.mHasRole(ROLE_CRO) or app.myUser.mHasRole(ROLE_CEO)).display;
+		write "vIsLevel1? " & vIsLevel1.display;
+		write "aisETPonExecutiteApproval: " & vAccount.myUnderwritingData.aIsETPonExecutiteApproval.display;
+		write "button enabled? " & chkETPExecApprve.enabled.display;
 	endif;
 	txtLoanID.text := vAccount.aAccountID;

C://PATCH_CONTROL//{TO → FROM}/FormEditCoreTranslatableString_mValidate.txt RENAMED Viewed

@@ -34,6 +34,8 @@ begin
 	//Verifying if keyname exists
 	if vErrorMsg = null then
 		vTranslateStringObj := myTranslatableStringList.allTranslatableStrings[ txtKeyName.text.trimBlanks];
 		if vTranslateStringObj <> null then
 			vErrorMsg := "Name already exists on " & cboSchema.text & " schema";

 	//Verifying if keyname exists
 	if vErrorMsg = null then
+		// #HTB-1592 NormanA 20Sep22 {124683} : Taking .toUpper out of pName and changing CoreTranslatableStringByKName
+		//										dictionary Member Key from aKeyNameUpper to aKeyName
 		vTranslateStringObj := myTranslatableStringList.allTranslatableStrings[ txtKeyName.text.trimBlanks];
 		if vTranslateStringObj <> null then
 			vErrorMsg := "Name already exists on " & cboSchema.text & " schema";

C://PATCH_CONTROL//{TO → FROM}/FormEditPayout_btnCreateDoc_click.txt RENAMED Viewed

@@ -48,7 +48,8 @@ begin
 		//Ticket 10462 - AlexanderV - 2018-06-19 - updating message
 		app.msgBox("Please go to the Documents tab to retrieve / view the document.", LMS360, MsgBox_OK_Only);
 		//Ticket 10271 - AlexanderV - 2018-05-31 - post the fee if we should
-		if myCalculator.myScenario.aIncludeStatementFee then
 			//Ticket 10462 - AlexanderV - 2018-07-03 - pAmount added
 		app.myFinancialTxnAgent.trxPostFeeCodeFee(myCalculator.myAccount,KN_STATEMENT_FEE, vScenario, vScenario.aStatementFee);
 		myCalculator.mUpdateArrears;
@@ -56,7 +57,7 @@ begin
 		vEvent := myCalculator.mSave;
 		myCalculator.mInit2(vEvent.myDischargeScenario);
 		mRefreshDetails;
-		endif;
 		//Ticket 10462 - AlexanderV - 2018-06-22
 		modalResult := ModalResult_OK;
 		unloadForm;

 		//Ticket 10462 - AlexanderV - 2018-06-19 - updating message
 		app.msgBox("Please go to the Documents tab to retrieve / view the document.", LMS360, MsgBox_OK_Only);
 		//Ticket 10271 - AlexanderV - 2018-05-31 - post the fee if we should
+		// #HTB-1629 SaulL 13Oct22 {124735}: Mortgage Statement fee will always be included now. So comment out the if check
+		//if myCalculator.myScenario.aIncludeStatementFee then
 			//Ticket 10462 - AlexanderV - 2018-07-03 - pAmount added
 		app.myFinancialTxnAgent.trxPostFeeCodeFee(myCalculator.myAccount,KN_STATEMENT_FEE, vScenario, vScenario.aStatementFee);
 		myCalculator.mUpdateArrears;
 		vEvent := myCalculator.mSave;
 		myCalculator.mInit2(vEvent.myDischargeScenario);
 		mRefreshDetails;
+		//endif;
 		//Ticket 10462 - AlexanderV - 2018-06-22
 		modalResult := ModalResult_OK;
 		unloadForm;

C://PATCH_CONTROL//{TO → FROM}/FormGlobalAuditViewer_mGetDesc.txt RENAMED Viewed

@@ -147,6 +147,11 @@ begin
 		return pObject.XRefNumber.myXRefType.mGetKeyName;
 	endif;
 epilog
 end;

 		return pObject.XRefNumber.myXRefType.mGetKeyName;
 	endif;
+	// #HTB0-1578 NormanA 20Oct22 {124716} : show client name if language is changed
+	if pObject.isKindOf(Contact) then
+		return pObject.Contact.mGetFirstName & " " & pObject.Contact.mGetLastName;
+	endif;
 epilog
 end;

C://PATCH_CONTROL//TO/FormLogonMessaging_class_info.txt DELETED Viewed

@@ -1,779 +0,0 @@
-FormLogonMessaging
-MAP:
-NAME:_persistentImpRefs
-LEN:12
-NAME:_transientImpRefs
-LEN:12
-NAME:___windowPtr
-LEN:12
-NAME:__children
-LEN:12
-NAME:__userObject
-LEN:12
-NAME:_hyperText
-LEN:-1
-NAME:_modifiedBy
-LEN:31
-NAME:_modifiedTimestamp
-LEN:8
-NAME:_patchVersion
-LEN:4
-NAME:_sysDHTMLScript
-LEN:-1
-NAME:_systemVersion
-LEN:9
-NAME:_webCssClass
-LEN:-1
-NAME:_webCssDefinition
-LEN:-1
-NAME:_webEventMappings
-LEN:-1
-NAME:actualClipControls
-LEN:1
-NAME:actualEnabled
-LEN:1
-NAME:actualMousePointer
-LEN:4
-NAME:actualVisible
-LEN:1
-NAME:allControlChildren
-LEN:12
-NAME:autoRedraw
-LEN:1
-NAME:backBrushStyle
-LEN:4
-NAME:backColor
-LEN:4
-NAME:borderStyle
-LEN:4
-NAME:bubbleHelp
-LEN:-1
-NAME:controlChildren
-LEN:12
-NAME:description
-LEN:-1
-NAME:disableEvents
-LEN:1
-NAME:disableReason
-LEN:-1
-NAME:dragCursor
-LEN:-1
-NAME:dragMode
-LEN:4
-NAME:drawFillColor
-LEN:4
-NAME:drawFillStyle
-LEN:4
-NAME:drawFontBold
-LEN:1
-NAME:drawFontItalic
-LEN:1
-NAME:drawFontName
-LEN:-1
-NAME:drawFontSize
-LEN:8
-NAME:drawFontStrikethru
-LEN:1
-NAME:drawFontUnderline
-LEN:1
-NAME:drawMode
-LEN:4
-NAME:drawStyle
-LEN:4
-NAME:drawTextAlign
-LEN:4
-NAME:drawTextCharRotation
-LEN:8
-NAME:drawTextRotation
-LEN:8
-NAME:drawWidth
-LEN:4
-NAME:drawWindow
-LEN:4
-NAME:enabled
-LEN:1
-NAME:height
-LEN:8
-NAME:helpContextId
-LEN:4
-NAME:helpKeyword
-LEN:-1
-NAME:ignoreSkin
-LEN:1
-NAME:left
-LEN:8
-NAME:mouseCursor
-LEN:-1
-NAME:mousePointer
-LEN:4
-NAME:name
-LEN:101
-NAME:scaleHeight
-LEN:8
-NAME:scaleLeft
-LEN:8
-NAME:scaleMode
-LEN:4
-NAME:scaleTop
-LEN:8
-NAME:scaleWidth
-LEN:8
-NAME:securityLevelEnabled
-LEN:4
-NAME:securityLevelVisible
-LEN:4
-NAME:skinCategoryName
-LEN:101
-NAME:tag
-LEN:-1
-NAME:top
-LEN:8
-NAME:userObject
-LEN:12
-NAME:userScript
-LEN:-1
-NAME:visible
-LEN:1
-NAME:width
-LEN:8
-NAME:_createdControls
-LEN:12
-NAME:_eventMappings
-LEN:-1
-NAME:_formBuildData
-LEN:-1
-NAME:_painterModifiedTimeStamp
-LEN:8
-NAME:_saveControlData
-LEN:12
-NAME:_webEnableHttpRequest
-LEN:1
-NAME:_webRegenPage
-LEN:1
-NAME:actualWindowState
-LEN:4
-NAME:allMenuItems
-LEN:12
-NAME:allowClose
-LEN:1
-NAME:allowDocking
-LEN:4
-NAME:applications
-LEN:12
-NAME:backBrush
-LEN:-1
-NAME:caption
-LEN:256
-NAME:clientHeight
-LEN:4
-NAME:clientWidth
-LEN:4
-NAME:clipControls
-LEN:1
-NAME:controlBox
-LEN:1
-NAME:controlList
-LEN:12
-NAME:formBuildDataTStrings
-LEN:12
-NAME:icon
-LEN:-1
-NAME:locale
-LEN:12
-NAME:maxButton
-LEN:1
-NAME:mdiChild
-LEN:4
-NAME:mdiClientScrollHorzPos
-LEN:4
-NAME:mdiClientScrollVertPos
-LEN:4
-NAME:mdiFrame
-LEN:1
-NAME:menuList
-LEN:12
-NAME:minButton
-LEN:1
-NAME:minimumHeight
-LEN:4
-NAME:minimumWidth
-LEN:4
-NAME:modalResult
-LEN:4
-NAME:paintedDialogBaseUnits
-LEN:4
-NAME:printerForm
-LEN:1
-NAME:scaleForm
-LEN:1
-NAME:scrollBars
-LEN:4
-NAME:scrollHorzPos
-LEN:4
-NAME:scrollVertPos
-LEN:4
-NAME:secureForm
-LEN:1
-NAME:topLevelMenuItems
-LEN:12
-NAME:userProfile
-LEN:12
-NAME:webBrowserAutoRefreshInterval
-LEN:4
-NAME:webBrowserAutoRefreshURL
-LEN:-1
-NAME:webBrowserDisableBackButton
-LEN:1
-NAME:webEncodingType
-LEN:1
-NAME:webFileName
-LEN:-1
-NAME:webForm
-LEN:1
-NAME:windowState
-LEN:4
-NAME:aAccessLevel
-LEN:4
-NAME:aAccessLevelOverride
-LEN:4
-NAME:aDirty
-LEN:1
-NAME:aLoadData
-LEN:1
-NAME:aLocaleName
-LEN:-1
-NAME:aSessionID
-LEN:31
-NAME:aUnloaded
-LEN:1
-NAME:allLocales
-LEN:12
-NAME:allPropertyControlLinks
-LEN:12
-NAME:allTransientsToDeleteOnUnload
-LEN:12
-NAME:myCurrentLocale
-LEN:12
-NAME:picTableFilter
-LEN:12
-NAME:aBufferEdition
-LEN:4
-NAME:aLastKeyPressed
-LEN:4
-NAME:aOverrideControl
-LEN:12
-NAME:aOverridePriorValue
-LEN:-1
-NAME:allCurrentOverrides
-LEN:12
-NAME:allFormErrors
-LEN:12
-NAME:myAppFormHelper
-LEN:12
-NAME:myBufferObject
-LEN:12
-NAME:aDevByPass
-LEN:1
-NAME:btnCancel
-LEN:12
-NAME:btnLanguage
-LEN:12
-NAME:btnOK
-LEN:12
-NAME:fraFrame1
-LEN:12
-NAME:fraFrame1_1
-LEN:12
-NAME:fraFrame3
-LEN:12
-NAME:fraFrame4
-LEN:12
-NAME:lblRelease
-LEN:12
-NAME:lblReleaseDate
-LEN:12
-NAME:lblTitle
-LEN:12
-NAME:lblUserName
-LEN:12
-NAME:lblUserName_1
-LEN:12
-NAME:lblVersion
-LEN:12
-NAME:picSystemLogo
-LEN:12
-NAME:picVertLine
-LEN:12
-NAME:picWebAddr
-LEN:12
-NAME:txtPassword
-LEN:12
-NAME:txtUserID
-LEN:12

C://PATCH_CONTROL//{TO → FROM}/FormMDIFeeSetup_class_info.txt RENAMED Viewed

@@ -887,6 +887,16 @@ LEN:12
 NAME:chkRestrictRole
 LEN:12

+NAME:chkNotIncludedAdvStm
+LEN:12
+Date Created:	03Nov22
+Created By:		SaulL
+Property Name:	chkNotIncludedAdvStm
+Patch Number:	124813
+Ticket:			HTB-1433
+Purpose:		Add a new flag to indicate whether the fee code should be included in the Advance Statement
 NAME:chkRestrictRole
 LEN:12

C://PATCH_CONTROL//{TO → FROM}/FormMDIFeeSetup_mDoAction.txt RENAMED Viewed

@@ -123,7 +123,10 @@ begin
 											cboMultiplyTerm.listObject.Terminology,
 											// #CTC-419 ChristopherD 04Dec20 {123305} : Adding a new property.
 											chkFullyAmortizeOnSaleToInvestor.value,
-											vFeeCodeInvestorTypeLinks);
 	return true;

 											cboMultiplyTerm.listObject.Terminology,
 											// #CTC-419 ChristopherD 04Dec20 {123305} : Adding a new property.
 											chkFullyAmortizeOnSaleToInvestor.value,
+											vFeeCodeInvestorTypeLinks,
+											//#HTB-1433 SaulL 04Nov22 {124813}: Adding a new property, aNotIncludedInAdvStm
+											chkNotIncludedAdvStm.value
+);
 	return true;

C://PATCH_CONTROL//{TO → FROM}/FormMDIFeeSetup_mListRowColChange.txt RENAMED Viewed

@@ -54,6 +54,8 @@ begin
 		cboDepositTxn.listObject := vFeeCode.myDepositTxn;
 		chkAllowInAdvanc.value := vFeeCode.aAllowInAdvance; chkAllowInAdvanc.click(chkAllowInAdvanc);
 		chkAutoPopulatre.value := vFeeCode.aAutoAddFeeOnFund;
 		chkIncludeAPR.value := vFeeCode.aInlcudeInAPR;

 		cboDepositTxn.listObject := vFeeCode.myDepositTxn;
 		chkAllowInAdvanc.value := vFeeCode.aAllowInAdvance; chkAllowInAdvanc.click(chkAllowInAdvanc);
+		// #HTB-1433 SaulL 04Nov22 {124813}: Added chkNotIncludedAdvStm
+		chkNotIncludedAdvStm.value := vFeeCode.mGetANotIncludedInAdvStm;
 		chkAutoPopulatre.value := vFeeCode.aAutoAddFeeOnFund;
 		chkIncludeAPR.value := vFeeCode.aInlcudeInAPR;

C://PATCH_CONTROL//FROM/FormMDIInvestorType_cboPlanningPools_displayRow.txt ADDED Viewed

	@@ -0,0 +1,21 @@

+cboPlanningPools_displayRow(combobox: ComboBox input; obj: Object; lstIndex: Integer; bcontinue: Boolean io):String updating;
+/*************************************************************************************************
+Date Created:	31 October 2022
+Created By:		NormanA
+Method Name:	cboPlanningPools_displayRow
+Patch Number:	124658
+Ticket:			HTB-1479
+Purpose:
+Date	Ticket	Patch	Who			Description
+-------	------  ------	-----------	--------------------------------------------------------------
+ddMMMyy
+*************************************************************************************************/
+vars
+begin
+	if not obj.SelectionPlan.mIsActive then
+		return null;
+	endif;
+	return obj.SelectionPlan.aName;
+end;

C://PATCH_CONTROL//{TO → FROM}/FormMDIInvestorType_class_info.txt RENAMED Viewed

@@ -852,6 +852,11 @@ LEN:12
 NAME:chkCMHCType
 LEN:12
@@ -935,6 +940,11 @@ LEN:12
 NAME:lblRemitSalesTxn
 LEN:12

+NAME:cboPlanningPools
+LEN:12
 NAME:chkCMHCType
 LEN:12
+NAME:lblPlanningPool
+LEN:12
 NAME:lblRemitSalesTxn
 LEN:12

C://PATCH_CONTROL//{TO → FROM}/FormMDIInvestorType_initialize.txt RENAMED Viewed

@@ -52,6 +52,10 @@ begin
 	chkIngorePoolCriteriaAutosale.top := chkIngorePoolCriteriaAutosale.top + 18;
 	btnPoolEdit.top := btnPoolEdit.top + 60;
 	//Ticket 10102 - AlexanderV - 2018-05-16
 	btnPoolEdit.xcoreEnable(false);
 epilog

 	chkIngorePoolCriteriaAutosale.top := chkIngorePoolCriteriaAutosale.top + 18;
 	btnPoolEdit.top := btnPoolEdit.top + 60;
+	// #HTB-1479 NormanA 03Nov22 {124658} display planning pools combo box
+	cboPlanningPools.displayCollection(app.mySelectionRoot.allSecuritizationPlans, true, 0, null, 'Pool Criteria Only');
+	cboPlanningPools.listIndex := 1;
 	//Ticket 10102 - AlexanderV - 2018-05-16
 	btnPoolEdit.xcoreEnable(false);
 epilog

C://PATCH_CONTROL//{TO → FROM}/FormMDIInvestorType_mDoAction.txt RENAMED Viewed

@@ -24,6 +24,7 @@ vars
 	vInvestorTypeBucketDefinitionLink : InvestorTypeBucketDefinitionLink;
 	vInvestorTypeBucketDefinitionLinks : InvestorTypeBucketDefinitionLinkByBDDict;
 	vRow : Integer;
 begin
 	if not mValidate then
@@ -66,6 +67,7 @@ begin
 	// #CTC-335 ThabanS 21May20 {122934} : added pPostToCurrentInvestor
 	// #11304 ThabanS 04Nov19 {122579} : added chkIngorePoolCriteriaAutosale
 	// #HTB-1315 ThabanS 14Feb22 {124196} :  added chkUseInvestorBankFund
 	app.myGeneralTxnAgent.trxUpdateInvestorType(vInvestorType,
 												aBufferEdition,
 												tblLocales.mGetDefaultLocaleShortName,
@@ -83,7 +85,8 @@ begin
 												cboLOB.listObject.Terminology,
 												chkPostToCurrent.value,
 												chkIngorePoolCriteriaAutosale.value,
-												chkUseInvestorBankFund.value);
 	mDisplayError(vErrorCode);

 	vInvestorTypeBucketDefinitionLink : InvestorTypeBucketDefinitionLink;
 	vInvestorTypeBucketDefinitionLinks : InvestorTypeBucketDefinitionLinkByBDDict;
 	vRow : Integer;
+	vPlanningPool : String;
 begin
 	if not mValidate then
 	// #CTC-335 ThabanS 21May20 {122934} : added pPostToCurrentInvestor
 	// #11304 ThabanS 04Nov19 {122579} : added chkIngorePoolCriteriaAutosale
 	// #HTB-1315 ThabanS 14Feb22 {124196} :  added chkUseInvestorBankFund
+	// #HTB-1479 NormanA 31Oct22 {124658} : add planning pool text to update investor type
 	app.myGeneralTxnAgent.trxUpdateInvestorType(vInvestorType,
 												aBufferEdition,
 												tblLocales.mGetDefaultLocaleShortName,
 												cboLOB.listObject.Terminology,
 												chkPostToCurrent.value,
 												chkIngorePoolCriteriaAutosale.value,
+												chkUseInvestorBankFund.value,
+												cboPlanningPools.text);
 	mDisplayError(vErrorCode);

C://PATCH_CONTROL//{TO → FROM}/FormMDIInvestorType_mLoadDetails.txt RENAMED Viewed

@@ -18,6 +18,8 @@ vars
 	vTxn : TxnDefinitionServicing;
 	vBucketDef : TxnBucketDefinition;
 	vLender : Lender;
 begin
 	inheritMethod();
@@ -92,6 +94,20 @@ begin
 	// #HTB-1315 ThabanS 14Feb22 {124196} :  added chkUseInvestorBankFund
 	chkUseInvestorBankFund.value := vInvestorType.aUseInvestorBankAccountOnSale;
 	//chkUseInvestorBankFund.enabled := vInvestorType.mIsSecuritized;
 epilog
 end;

 	vTxn : TxnDefinitionServicing;
 	vBucketDef : TxnBucketDefinition;
 	vLender : Lender;
+	vListIndex : Integer;
+	vChanged : Boolean;
 begin
 	inheritMethod();
 	// #HTB-1315 ThabanS 14Feb22 {124196} :  added chkUseInvestorBankFund
 	chkUseInvestorBankFund.value := vInvestorType.aUseInvestorBankAccountOnSale;
 	//chkUseInvestorBankFund.enabled := vInvestorType.mIsSecuritized;
+	// #HTB-1479 NormanA 02Nov22 {124658} : set combo box to investor type's pooling plan
+	vChanged := false;
+	foreach vListIndex in 1 to cboPlanningPools.getCollection.size + 1 do
+		cboPlanningPools.listIndex := vListIndex;
+		if vInvestorType.mGetDefaultPool <> null and cboPlanningPools.text = vInvestorType.mGetDefaultPool then
+			cboPlanningPools.listIndex := vListIndex;
+			vChanged := true;
+			break;
+		endif;
+	endforeach;
+	if not vChanged then
+		cboPlanningPools.listIndex := 1;
+	endif;
 epilog
 end;

C://PATCH_CONTROL//TO/FormMesagingMgrMDIChild_class_info.txt DELETED Viewed

@@ -1,584 +0,0 @@
-FormMesagingMgrMDIChild
-MAP:
-NAME:_persistentImpRefs
-LEN:12
-NAME:_transientImpRefs
-LEN:12
-NAME:___windowPtr
-LEN:12
-NAME:__children
-LEN:12
-NAME:__userObject
-LEN:12
-NAME:_hyperText
-LEN:-1
-NAME:_modifiedBy
-LEN:31
-NAME:_modifiedTimestamp
-LEN:8
-NAME:_patchVersion
-LEN:4
-NAME:_sysDHTMLScript
-LEN:-1
-NAME:_systemVersion
-LEN:9
-NAME:_webCssClass
-LEN:-1
-NAME:_webCssDefinition
-LEN:-1
-NAME:_webEventMappings
-LEN:-1
-NAME:actualClipControls
-LEN:1
-NAME:actualEnabled
-LEN:1
-NAME:actualMousePointer
-LEN:4
-NAME:actualVisible
-LEN:1
-NAME:allControlChildren
-LEN:12
-NAME:autoRedraw
-LEN:1
-NAME:backBrushStyle
-LEN:4
-NAME:backColor
-LEN:4
-NAME:borderStyle
-LEN:4
-NAME:bubbleHelp
-LEN:-1
-NAME:controlChildren
-LEN:12
-NAME:description
-LEN:-1
-NAME:disableEvents
-LEN:1
-NAME:disableReason
-LEN:-1
-NAME:dragCursor
-LEN:-1
-NAME:dragMode
-LEN:4
-NAME:drawFillColor
-LEN:4
-NAME:drawFillStyle
-LEN:4
-NAME:drawFontBold
-LEN:1
-NAME:drawFontItalic
-LEN:1
-NAME:drawFontName
-LEN:-1
-NAME:drawFontSize
-LEN:8
-NAME:drawFontStrikethru
-LEN:1
-NAME:drawFontUnderline
-LEN:1
-NAME:drawMode
-LEN:4
-NAME:drawStyle
-LEN:4
-NAME:drawTextAlign
-LEN:4
-NAME:drawTextCharRotation
-LEN:8
-NAME:drawTextRotation
-LEN:8
-NAME:drawWidth
-LEN:4
-NAME:drawWindow
-LEN:4
-NAME:enabled
-LEN:1
-NAME:height
-LEN:8
-NAME:helpContextId
-LEN:4
-NAME:helpKeyword
-LEN:-1
-NAME:ignoreSkin
-LEN:1
-NAME:left
-LEN:8
-NAME:mouseCursor
-LEN:-1
-NAME:mousePointer
-LEN:4
-NAME:name
-LEN:101
-NAME:scaleHeight
-LEN:8
-NAME:scaleLeft
-LEN:8
-NAME:scaleMode
-LEN:4
-NAME:scaleTop
-LEN:8
-NAME:scaleWidth
-LEN:8
-NAME:securityLevelEnabled
-LEN:4
-NAME:securityLevelVisible
-LEN:4
-NAME:skinCategoryName
-LEN:101
-NAME:tag
-LEN:-1
-NAME:top
-LEN:8
-NAME:userObject
-LEN:12
-NAME:userScript
-LEN:-1
-NAME:visible
-LEN:1
-NAME:width
-LEN:8
-NAME:_createdControls
-LEN:12
-NAME:_eventMappings
-LEN:-1
-NAME:_formBuildData
-LEN:-1
-NAME:_painterModifiedTimeStamp
-LEN:8
-NAME:_saveControlData
-LEN:12
-NAME:_webEnableHttpRequest
-LEN:1
-NAME:_webRegenPage
-LEN:1
-NAME:actualWindowState
-LEN:4
-NAME:allMenuItems
-LEN:12
-NAME:allowClose
-LEN:1
-NAME:allowDocking
-LEN:4
-NAME:applications
-LEN:12
-NAME:backBrush
-LEN:-1
-NAME:caption
-LEN:256
-NAME:clientHeight
-LEN:4
-NAME:clientWidth
-LEN:4
-NAME:clipControls
-LEN:1
-NAME:controlBox
-LEN:1
-NAME:controlList
-LEN:12
-NAME:formBuildDataTStrings
-LEN:12
-NAME:icon
-LEN:-1
-NAME:locale
-LEN:12
-NAME:maxButton
-LEN:1
-NAME:mdiChild
-LEN:4
-NAME:mdiClientScrollHorzPos
-LEN:4
-NAME:mdiClientScrollVertPos
-LEN:4
-NAME:mdiFrame
-LEN:1
-NAME:menuList
-LEN:12
-NAME:minButton
-LEN:1
-NAME:minimumHeight
-LEN:4
-NAME:minimumWidth
-LEN:4
-NAME:modalResult
-LEN:4
-NAME:paintedDialogBaseUnits
-LEN:4
-NAME:printerForm
-LEN:1
-NAME:scaleForm
-LEN:1
-NAME:scrollBars
-LEN:4
-NAME:scrollHorzPos
-LEN:4
-NAME:scrollVertPos
-LEN:4
-NAME:secureForm
-LEN:1
-NAME:topLevelMenuItems
-LEN:12
-NAME:userProfile
-LEN:12
-NAME:webBrowserAutoRefreshInterval
-LEN:4
-NAME:webBrowserAutoRefreshURL
-LEN:-1
-NAME:webBrowserDisableBackButton
-LEN:1
-NAME:webEncodingType
-LEN:1
-NAME:webFileName
-LEN:-1
-NAME:webForm
-LEN:1
-NAME:windowState
-LEN:4

C://PATCH_CONTROL//TO/FormMessageDetails_btnOK_click.txt DELETED Viewed

@@ -1,19 +0,0 @@
-btnOK_click(jadeMask: JadeMask input) updating;
-/*
-	Created	:	24 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	unloadForm;
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessageDetails_class_info.txt DELETED Viewed

@@ -1,614 +0,0 @@
-FormMessageDetails
-MAP:
-NAME:_persistentImpRefs
-LEN:12
-NAME:_transientImpRefs
-LEN:12
-NAME:___windowPtr
-LEN:12
-NAME:__children
-LEN:12
-NAME:__userObject
-LEN:12
-NAME:_hyperText
-LEN:-1
-NAME:_modifiedBy
-LEN:31
-NAME:_modifiedTimestamp
-LEN:8
-NAME:_patchVersion
-LEN:4
-NAME:_sysDHTMLScript
-LEN:-1
-NAME:_systemVersion
-LEN:9
-NAME:_webCssClass
-LEN:-1
-NAME:_webCssDefinition
-LEN:-1
-NAME:_webEventMappings
-LEN:-1
-NAME:actualClipControls
-LEN:1
-NAME:actualEnabled
-LEN:1
-NAME:actualMousePointer
-LEN:4
-NAME:actualVisible
-LEN:1
-NAME:allControlChildren
-LEN:12
-NAME:autoRedraw
-LEN:1
-NAME:backBrushStyle
-LEN:4
-NAME:backColor
-LEN:4
-NAME:borderStyle
-LEN:4
-NAME:bubbleHelp
-LEN:-1
-NAME:controlChildren
-LEN:12
-NAME:description
-LEN:-1
-NAME:disableEvents
-LEN:1
-NAME:disableReason
-LEN:-1
-NAME:dragCursor
-LEN:-1
-NAME:dragMode
-LEN:4
-NAME:drawFillColor
-LEN:4
-NAME:drawFillStyle
-LEN:4
-NAME:drawFontBold
-LEN:1
-NAME:drawFontItalic
-LEN:1
-NAME:drawFontName
-LEN:-1
-NAME:drawFontSize
-LEN:8
-NAME:drawFontStrikethru
-LEN:1
-NAME:drawFontUnderline
-LEN:1
-NAME:drawMode
-LEN:4
-NAME:drawStyle
-LEN:4
-NAME:drawTextAlign
-LEN:4
-NAME:drawTextCharRotation
-LEN:8
-NAME:drawTextRotation
-LEN:8
-NAME:drawWidth
-LEN:4
-NAME:drawWindow
-LEN:4
-NAME:enabled
-LEN:1
-NAME:height
-LEN:8
-NAME:helpContextId
-LEN:4
-NAME:helpKeyword
-LEN:-1
-NAME:ignoreSkin
-LEN:1
-NAME:left
-LEN:8
-NAME:mouseCursor
-LEN:-1
-NAME:mousePointer
-LEN:4
-NAME:name
-LEN:101
-NAME:scaleHeight
-LEN:8
-NAME:scaleLeft
-LEN:8
-NAME:scaleMode
-LEN:4
-NAME:scaleTop
-LEN:8
-NAME:scaleWidth
-LEN:8
-NAME:securityLevelEnabled
-LEN:4
-NAME:securityLevelVisible
-LEN:4
-NAME:skinCategoryName
-LEN:101
-NAME:tag
-LEN:-1
-NAME:top
-LEN:8
-NAME:userObject
-LEN:12
-NAME:userScript
-LEN:-1
-NAME:visible
-LEN:1
-NAME:width
-LEN:8
-NAME:_createdControls
-LEN:12
-NAME:_eventMappings
-LEN:-1
-NAME:_formBuildData
-LEN:-1
-NAME:_painterModifiedTimeStamp
-LEN:8
-NAME:_saveControlData
-LEN:12
-NAME:_webEnableHttpRequest
-LEN:1
-NAME:_webRegenPage
-LEN:1
-NAME:actualWindowState
-LEN:4
-NAME:allMenuItems
-LEN:12
-NAME:allowClose
-LEN:1
-NAME:allowDocking
-LEN:4
-NAME:applications
-LEN:12
-NAME:backBrush
-LEN:-1
-NAME:caption
-LEN:256
-NAME:clientHeight
-LEN:4
-NAME:clientWidth
-LEN:4
-NAME:clipControls
-LEN:1
-NAME:controlBox
-LEN:1
-NAME:controlList
-LEN:12
-NAME:formBuildDataTStrings
-LEN:12
-NAME:icon
-LEN:-1
-NAME:locale
-LEN:12
-NAME:maxButton
-LEN:1
-NAME:mdiChild
-LEN:4
-NAME:mdiClientScrollHorzPos
-LEN:4
-NAME:mdiClientScrollVertPos
-LEN:4
-NAME:mdiFrame
-LEN:1
-NAME:menuList
-LEN:12
-NAME:minButton
-LEN:1
-NAME:minimumHeight
-LEN:4
-NAME:minimumWidth
-LEN:4
-NAME:modalResult
-LEN:4
-NAME:paintedDialogBaseUnits
-LEN:4
-NAME:printerForm
-LEN:1
-NAME:scaleForm
-LEN:1
-NAME:scrollBars
-LEN:4
-NAME:scrollHorzPos
-LEN:4
-NAME:scrollVertPos
-LEN:4
-NAME:secureForm
-LEN:1
-NAME:topLevelMenuItems
-LEN:12
-NAME:userProfile
-LEN:12
-NAME:webBrowserAutoRefreshInterval
-LEN:4
-NAME:webBrowserAutoRefreshURL
-LEN:-1
-NAME:webBrowserDisableBackButton
-LEN:1
-NAME:webEncodingType
-LEN:1
-NAME:webFileName
-LEN:-1
-NAME:webForm
-LEN:1
-NAME:windowState
-LEN:4
-NAME:btnOK
-LEN:12
-NAME:txtDateTime
-LEN:12
-NAME:txtDescription
-LEN:12
-NAME:txtMessage
-LEN:12
-NAME:txtReason
-LEN:12
-NAME:txtStackDump
-LEN:12

C://PATCH_CONTROL//TO/FormMessageDetails_mSetDetails.txt DELETED Viewed

@@ -1,23 +0,0 @@
-mSetDetails(pMessage : Message);
-/*
-	Created	:	24 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	txtDateTime.text 	:= pMessage.aFailureDateTime.String;
-	txtReason.text		:= pMessage.aReason;
-	txtDescription.text	:= pMessage.aDescription;
-	txtMessage.text		:= pMessage.aBody;
-	txtStackDump.text	:= pMessage.aStackDump;
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMgrMain_class_info.txt DELETED Viewed

@@ -1,689 +0,0 @@
-FormMessagingMgrMain
-MAP:
-NAME:_persistentImpRefs
-LEN:12
-NAME:_transientImpRefs
-LEN:12
-NAME:___windowPtr
-LEN:12
-NAME:__children
-LEN:12
-NAME:__userObject
-LEN:12
-NAME:_hyperText
-LEN:-1
-NAME:_modifiedBy
-LEN:31
-NAME:_modifiedTimestamp
-LEN:8
-NAME:_patchVersion
-LEN:4
-NAME:_sysDHTMLScript
-LEN:-1
-NAME:_systemVersion
-LEN:9
-NAME:_webCssClass
-LEN:-1
-NAME:_webCssDefinition
-LEN:-1
-NAME:_webEventMappings
-LEN:-1
-NAME:actualClipControls
-LEN:1
-NAME:actualEnabled
-LEN:1
-NAME:actualMousePointer
-LEN:4
-NAME:actualVisible
-LEN:1
-NAME:allControlChildren
-LEN:12
-NAME:autoRedraw
-LEN:1
-NAME:backBrushStyle
-LEN:4
-NAME:backColor
-LEN:4
-NAME:borderStyle
-LEN:4
-NAME:bubbleHelp
-LEN:-1
-NAME:controlChildren
-LEN:12
-NAME:description
-LEN:-1
-NAME:disableEvents
-LEN:1
-NAME:disableReason
-LEN:-1
-NAME:dragCursor
-LEN:-1
-NAME:dragMode
-LEN:4
-NAME:drawFillColor
-LEN:4
-NAME:drawFillStyle
-LEN:4
-NAME:drawFontBold
-LEN:1
-NAME:drawFontItalic
-LEN:1
-NAME:drawFontName
-LEN:-1
-NAME:drawFontSize
-LEN:8
-NAME:drawFontStrikethru
-LEN:1
-NAME:drawFontUnderline
-LEN:1
-NAME:drawMode
-LEN:4
-NAME:drawStyle
-LEN:4
-NAME:drawTextAlign
-LEN:4
-NAME:drawTextCharRotation
-LEN:8
-NAME:drawTextRotation
-LEN:8
-NAME:drawWidth
-LEN:4
-NAME:drawWindow
-LEN:4
-NAME:enabled
-LEN:1
-NAME:height
-LEN:8
-NAME:helpContextId
-LEN:4
-NAME:helpKeyword
-LEN:-1
-NAME:ignoreSkin
-LEN:1
-NAME:left
-LEN:8
-NAME:mouseCursor
-LEN:-1
-NAME:mousePointer
-LEN:4
-NAME:name
-LEN:101
-NAME:scaleHeight
-LEN:8
-NAME:scaleLeft
-LEN:8
-NAME:scaleMode
-LEN:4
-NAME:scaleTop
-LEN:8
-NAME:scaleWidth
-LEN:8
-NAME:securityLevelEnabled
-LEN:4
-NAME:securityLevelVisible
-LEN:4
-NAME:skinCategoryName
-LEN:101
-NAME:tag
-LEN:-1
-NAME:top
-LEN:8
-NAME:userObject
-LEN:12
-NAME:userScript
-LEN:-1
-NAME:visible
-LEN:1
-NAME:width
-LEN:8
-NAME:_createdControls
-LEN:12
-NAME:_eventMappings
-LEN:-1
-NAME:_formBuildData
-LEN:-1
-NAME:_painterModifiedTimeStamp
-LEN:8
-NAME:_saveControlData
-LEN:12
-NAME:_webEnableHttpRequest
-LEN:1
-NAME:_webRegenPage
-LEN:1
-NAME:actualWindowState
-LEN:4
-NAME:allMenuItems
-LEN:12
-NAME:allowClose
-LEN:1
-NAME:allowDocking
-LEN:4
-NAME:applications
-LEN:12
-NAME:backBrush
-LEN:-1
-NAME:caption
-LEN:256
-NAME:clientHeight
-LEN:4
-NAME:clientWidth
-LEN:4
-NAME:clipControls
-LEN:1
-NAME:controlBox
-LEN:1
-NAME:controlList
-LEN:12
-NAME:formBuildDataTStrings
-LEN:12
-NAME:icon
-LEN:-1
-NAME:locale
-LEN:12
-NAME:maxButton
-LEN:1
-NAME:mdiChild
-LEN:4
-NAME:mdiClientScrollHorzPos
-LEN:4
-NAME:mdiClientScrollVertPos
-LEN:4
-NAME:mdiFrame
-LEN:1
-NAME:menuList
-LEN:12
-NAME:minButton
-LEN:1
-NAME:minimumHeight
-LEN:4
-NAME:minimumWidth
-LEN:4
-NAME:modalResult
-LEN:4
-NAME:paintedDialogBaseUnits
-LEN:4
-NAME:printerForm
-LEN:1
-NAME:scaleForm
-LEN:1
-NAME:scrollBars
-LEN:4
-NAME:scrollHorzPos
-LEN:4
-NAME:scrollVertPos
-LEN:4
-NAME:secureForm
-LEN:1
-NAME:topLevelMenuItems
-LEN:12
-NAME:userProfile
-LEN:12
-NAME:webBrowserAutoRefreshInterval
-LEN:4
-NAME:webBrowserAutoRefreshURL
-LEN:-1
-NAME:webBrowserDisableBackButton
-LEN:1
-NAME:webEncodingType
-LEN:1
-NAME:webFileName
-LEN:-1
-NAME:webForm
-LEN:1
-NAME:windowState
-LEN:4
-NAME:fraMDI
-LEN:12
-NAME:jdbRight
-LEN:12
-NAME:jdbRightInside
-LEN:12
-NAME:jdbToolbar
-LEN:12
-NAME:jdcMain
-LEN:12
-NAME:jdcStatusLine
-LEN:12
-NAME:jdcStatusLine_1
-LEN:12
-NAME:jdcStatus_0
-LEN:12
-NAME:jdcStatus_1
-LEN:12
-NAME:jdcStatus_3
-LEN:12
-NAME:jdcStatus_4
-LEN:12
-NAME:jdcStatus_5
-LEN:12
-NAME:jdcStatus_6
-LEN:12
-NAME:jdcStatus_7
-LEN:12
-NAME:mnuExit
-LEN:12
-NAME:mnuFile
-LEN:12
-NAME:mnuPreferences
-LEN:12
-NAME:mnuUtilities
-LEN:12
-NAME:staDate
-LEN:12
-NAME:staMainStatus
-LEN:12
-NAME:staUser
-LEN:12

C://PATCH_CONTROL//TO/FormMessagingMgrMain_initialize.txt DELETED Viewed

@@ -1,44 +0,0 @@
-initialize() updating;
-/*
-	Created	:	09 September 2008 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-	vForm		: FormMessagingMonitor;
-begin
-	inheritMethod();
-	//11170 - ThabanS - 10Dec2018
-	if not app.myUser.mIsAllowedFormAccess(self.name, app.mGetSystemDate, APP_MESSAGING) then
-		app.msgBox('You do have access to this form ' & self.name, LMS360, MsgBox_OK_Excl);
-		terminate;
-	endif;
-	// Set the MDI frame and position.
-	app.mdiFrame := class;
-	moveMdiClient( fraMDI.getFormLeft, fraMDI.getFormTop, fraMDI.width, fraMDI.height);
-	vForm := app.getForm(FormMessagingMonitor.name).FormMessagingMonitor;
-	if vForm = null then
-		create vForm;
-	endif;
-	vForm.show;
-	staUser.caption := app.myUser.mGetName;
-	staDate.caption	:= app.actualTimeServer.date.String;
-//	staDate.caption	:= app.mGetSystemDate.String;
-	mSetStatusBar('Messaging Manager');
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMgrMain_jdbRight_userResize.txt DELETED Viewed

@@ -1,19 +0,0 @@
-jdbRight_userResize(dockBar: JadeDockBar input) updating;
-/*
-	Created	:	09 September 2008 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	mResize;
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMgrMain_mResize.txt DELETED Viewed

@@ -1,20 +0,0 @@
-mResize();
-/*
-	Created	:	09 September 2008 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	// When resizing, we need to reset the mdi area.
-	moveMdiClient( fraMDI.getFormLeft, fraMDI.getFormTop, fraMDI.width, fraMDI.height);
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMgrMain_mSetStatusBar.txt DELETED Viewed

@@ -1,19 +0,0 @@
-mSetStatusBar(pMessage : String);
-/*
-	Created	:	10 September 2008 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	staMainStatus.caption := pMessage;
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMgrMain_mUserPreferences.txt DELETED Viewed

@@ -1,19 +0,0 @@
-mUserPreferences();
-/*
-	Created	:	13 January 2009 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMgrMain_mnuExit_click.txt DELETED Viewed

@@ -1,19 +0,0 @@
-mnuExit_click(menuItem: MenuItem input) updating;
-/*
-	Created	:	13 January 2009 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	self.unloadForm;
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMgrMain_mnuPreferences_click.txt DELETED Viewed

@@ -1,19 +0,0 @@
-mnuPreferences_click(menuItem: MenuItem input) updating;
-/*
-	Created	:	13 January 2009 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	mUserPreferences;
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMgrMain_resize.txt DELETED Viewed

@@ -1,19 +0,0 @@
-resize() updating;
-/*
-	Created	:	09 September 2008 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	mResize;
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMgrModal_class_info.txt DELETED Viewed

@@ -1,584 +0,0 @@
-FormMessagingMgrModal
-MAP:
-NAME:_persistentImpRefs
-LEN:12
-NAME:_transientImpRefs
-LEN:12
-NAME:___windowPtr
-LEN:12
-NAME:__children
-LEN:12
-NAME:__userObject
-LEN:12
-NAME:_hyperText
-LEN:-1
-NAME:_modifiedBy
-LEN:31
-NAME:_modifiedTimestamp
-LEN:8
-NAME:_patchVersion
-LEN:4
-NAME:_sysDHTMLScript
-LEN:-1
-NAME:_systemVersion
-LEN:9
-NAME:_webCssClass
-LEN:-1
-NAME:_webCssDefinition
-LEN:-1
-NAME:_webEventMappings
-LEN:-1
-NAME:actualClipControls
-LEN:1
-NAME:actualEnabled
-LEN:1
-NAME:actualMousePointer
-LEN:4
-NAME:actualVisible
-LEN:1
-NAME:allControlChildren
-LEN:12
-NAME:autoRedraw
-LEN:1
-NAME:backBrushStyle
-LEN:4
-NAME:backColor
-LEN:4
-NAME:borderStyle
-LEN:4
-NAME:bubbleHelp
-LEN:-1
-NAME:controlChildren
-LEN:12
-NAME:description
-LEN:-1
-NAME:disableEvents
-LEN:1
-NAME:disableReason
-LEN:-1
-NAME:dragCursor
-LEN:-1
-NAME:dragMode
-LEN:4
-NAME:drawFillColor
-LEN:4
-NAME:drawFillStyle
-LEN:4
-NAME:drawFontBold
-LEN:1
-NAME:drawFontItalic
-LEN:1
-NAME:drawFontName
-LEN:-1
-NAME:drawFontSize
-LEN:8
-NAME:drawFontStrikethru
-LEN:1
-NAME:drawFontUnderline
-LEN:1
-NAME:drawMode
-LEN:4
-NAME:drawStyle
-LEN:4
-NAME:drawTextAlign
-LEN:4
-NAME:drawTextCharRotation
-LEN:8
-NAME:drawTextRotation
-LEN:8
-NAME:drawWidth
-LEN:4
-NAME:drawWindow
-LEN:4
-NAME:enabled
-LEN:1
-NAME:height
-LEN:8
-NAME:helpContextId
-LEN:4
-NAME:helpKeyword
-LEN:-1
-NAME:ignoreSkin
-LEN:1
-NAME:left
-LEN:8
-NAME:mouseCursor
-LEN:-1
-NAME:mousePointer
-LEN:4
-NAME:name
-LEN:101
-NAME:scaleHeight
-LEN:8
-NAME:scaleLeft
-LEN:8
-NAME:scaleMode
-LEN:4
-NAME:scaleTop
-LEN:8
-NAME:scaleWidth
-LEN:8
-NAME:securityLevelEnabled
-LEN:4
-NAME:securityLevelVisible
-LEN:4
-NAME:skinCategoryName
-LEN:101
-NAME:tag
-LEN:-1
-NAME:top
-LEN:8
-NAME:userObject
-LEN:12
-NAME:userScript
-LEN:-1
-NAME:visible
-LEN:1
-NAME:width
-LEN:8
-NAME:_createdControls
-LEN:12
-NAME:_eventMappings
-LEN:-1
-NAME:_formBuildData
-LEN:-1
-NAME:_painterModifiedTimeStamp
-LEN:8
-NAME:_saveControlData
-LEN:12
-NAME:_webEnableHttpRequest
-LEN:1
-NAME:_webRegenPage
-LEN:1
-NAME:actualWindowState
-LEN:4
-NAME:allMenuItems
-LEN:12
-NAME:allowClose
-LEN:1
-NAME:allowDocking
-LEN:4
-NAME:applications
-LEN:12
-NAME:backBrush
-LEN:-1
-NAME:caption
-LEN:256
-NAME:clientHeight
-LEN:4
-NAME:clientWidth
-LEN:4
-NAME:clipControls
-LEN:1
-NAME:controlBox
-LEN:1
-NAME:controlList
-LEN:12
-NAME:formBuildDataTStrings
-LEN:12
-NAME:icon
-LEN:-1
-NAME:locale
-LEN:12
-NAME:maxButton
-LEN:1
-NAME:mdiChild
-LEN:4
-NAME:mdiClientScrollHorzPos
-LEN:4
-NAME:mdiClientScrollVertPos
-LEN:4
-NAME:mdiFrame
-LEN:1
-NAME:menuList
-LEN:12
-NAME:minButton
-LEN:1
-NAME:minimumHeight
-LEN:4
-NAME:minimumWidth
-LEN:4
-NAME:modalResult
-LEN:4
-NAME:paintedDialogBaseUnits
-LEN:4
-NAME:printerForm
-LEN:1
-NAME:scaleForm
-LEN:1
-NAME:scrollBars
-LEN:4
-NAME:scrollHorzPos
-LEN:4
-NAME:scrollVertPos
-LEN:4
-NAME:secureForm
-LEN:1
-NAME:topLevelMenuItems
-LEN:12
-NAME:userProfile
-LEN:12
-NAME:webBrowserAutoRefreshInterval
-LEN:4
-NAME:webBrowserAutoRefreshURL
-LEN:-1
-NAME:webBrowserDisableBackButton
-LEN:1
-NAME:webEncodingType
-LEN:1
-NAME:webFileName
-LEN:-1
-NAME:webForm
-LEN:1
-NAME:windowState
-LEN:4

C://PATCH_CONTROL//TO/FormMessagingMgr_class_info.txt DELETED Viewed

@@ -1,584 +0,0 @@
-FormMessagingMgr
-MAP:
-NAME:_persistentImpRefs
-LEN:12
-NAME:_transientImpRefs
-LEN:12
-NAME:___windowPtr
-LEN:12
-NAME:__children
-LEN:12
-NAME:__userObject
-LEN:12
-NAME:_hyperText
-LEN:-1
-NAME:_modifiedBy
-LEN:31
-NAME:_modifiedTimestamp
-LEN:8
-NAME:_patchVersion
-LEN:4
-NAME:_sysDHTMLScript
-LEN:-1
-NAME:_systemVersion
-LEN:9
-NAME:_webCssClass
-LEN:-1
-NAME:_webCssDefinition
-LEN:-1
-NAME:_webEventMappings
-LEN:-1
-NAME:actualClipControls
-LEN:1
-NAME:actualEnabled
-LEN:1
-NAME:actualMousePointer
-LEN:4
-NAME:actualVisible
-LEN:1
-NAME:allControlChildren
-LEN:12
-NAME:autoRedraw
-LEN:1
-NAME:backBrushStyle
-LEN:4
-NAME:backColor
-LEN:4
-NAME:borderStyle
-LEN:4
-NAME:bubbleHelp
-LEN:-1
-NAME:controlChildren
-LEN:12
-NAME:description
-LEN:-1
-NAME:disableEvents
-LEN:1
-NAME:disableReason
-LEN:-1
-NAME:dragCursor
-LEN:-1
-NAME:dragMode
-LEN:4
-NAME:drawFillColor
-LEN:4
-NAME:drawFillStyle
-LEN:4
-NAME:drawFontBold
-LEN:1
-NAME:drawFontItalic
-LEN:1
-NAME:drawFontName
-LEN:-1
-NAME:drawFontSize
-LEN:8
-NAME:drawFontStrikethru
-LEN:1
-NAME:drawFontUnderline
-LEN:1
-NAME:drawMode
-LEN:4
-NAME:drawStyle
-LEN:4
-NAME:drawTextAlign
-LEN:4
-NAME:drawTextCharRotation
-LEN:8
-NAME:drawTextRotation
-LEN:8
-NAME:drawWidth
-LEN:4
-NAME:drawWindow
-LEN:4
-NAME:enabled
-LEN:1
-NAME:height
-LEN:8
-NAME:helpContextId
-LEN:4
-NAME:helpKeyword
-LEN:-1
-NAME:ignoreSkin
-LEN:1
-NAME:left
-LEN:8
-NAME:mouseCursor
-LEN:-1
-NAME:mousePointer
-LEN:4
-NAME:name
-LEN:101
-NAME:scaleHeight
-LEN:8
-NAME:scaleLeft
-LEN:8
-NAME:scaleMode
-LEN:4
-NAME:scaleTop
-LEN:8
-NAME:scaleWidth
-LEN:8
-NAME:securityLevelEnabled
-LEN:4
-NAME:securityLevelVisible
-LEN:4
-NAME:skinCategoryName
-LEN:101
-NAME:tag
-LEN:-1
-NAME:top
-LEN:8
-NAME:userObject
-LEN:12
-NAME:userScript
-LEN:-1
-NAME:visible
-LEN:1
-NAME:width
-LEN:8
-NAME:_createdControls
-LEN:12
-NAME:_eventMappings
-LEN:-1
-NAME:_formBuildData
-LEN:-1
-NAME:_painterModifiedTimeStamp
-LEN:8
-NAME:_saveControlData
-LEN:12
-NAME:_webEnableHttpRequest
-LEN:1
-NAME:_webRegenPage
-LEN:1
-NAME:actualWindowState
-LEN:4
-NAME:allMenuItems
-LEN:12
-NAME:allowClose
-LEN:1
-NAME:allowDocking
-LEN:4
-NAME:applications
-LEN:12
-NAME:backBrush
-LEN:-1
-NAME:caption
-LEN:256
-NAME:clientHeight
-LEN:4
-NAME:clientWidth
-LEN:4
-NAME:clipControls
-LEN:1
-NAME:controlBox
-LEN:1
-NAME:controlList
-LEN:12
-NAME:formBuildDataTStrings
-LEN:12
-NAME:icon
-LEN:-1
-NAME:locale
-LEN:12
-NAME:maxButton
-LEN:1
-NAME:mdiChild
-LEN:4
-NAME:mdiClientScrollHorzPos
-LEN:4
-NAME:mdiClientScrollVertPos
-LEN:4
-NAME:mdiFrame
-LEN:1
-NAME:menuList
-LEN:12
-NAME:minButton
-LEN:1
-NAME:minimumHeight
-LEN:4
-NAME:minimumWidth
-LEN:4
-NAME:modalResult
-LEN:4
-NAME:paintedDialogBaseUnits
-LEN:4
-NAME:printerForm
-LEN:1
-NAME:scaleForm
-LEN:1
-NAME:scrollBars
-LEN:4
-NAME:scrollHorzPos
-LEN:4
-NAME:scrollVertPos
-LEN:4
-NAME:secureForm
-LEN:1
-NAME:topLevelMenuItems
-LEN:12
-NAME:userProfile
-LEN:12
-NAME:webBrowserAutoRefreshInterval
-LEN:4
-NAME:webBrowserAutoRefreshURL
-LEN:-1
-NAME:webBrowserDisableBackButton
-LEN:1
-NAME:webEncodingType
-LEN:1
-NAME:webFileName
-LEN:-1
-NAME:webForm
-LEN:1
-NAME:windowState
-LEN:4

C://PATCH_CONTROL//TO/FormMessagingMgr_initialize.txt DELETED Viewed

@@ -1,19 +0,0 @@
-initialize()updating;
-/*
-	Created	:	16 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	centreWindow;
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMgr_load.txt DELETED Viewed

@@ -1,19 +0,0 @@
-load() updating;
-/*
-	Created	:	16 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	initialize;
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMonitor_class_info.txt DELETED Viewed

@@ -1,689 +0,0 @@
-FormMessagingMonitor
-MAP:
-NAME:_persistentImpRefs
-LEN:12
-NAME:_transientImpRefs
-LEN:12
-NAME:___windowPtr
-LEN:12
-NAME:__children
-LEN:12
-NAME:__userObject
-LEN:12
-NAME:_hyperText
-LEN:-1
-NAME:_modifiedBy
-LEN:31
-NAME:_modifiedTimestamp
-LEN:8
-NAME:_patchVersion
-LEN:4
-NAME:_sysDHTMLScript
-LEN:-1
-NAME:_systemVersion
-LEN:9
-NAME:_webCssClass
-LEN:-1
-NAME:_webCssDefinition
-LEN:-1
-NAME:_webEventMappings
-LEN:-1
-NAME:actualClipControls
-LEN:1
-NAME:actualEnabled
-LEN:1
-NAME:actualMousePointer
-LEN:4
-NAME:actualVisible
-LEN:1
-NAME:allControlChildren
-LEN:12
-NAME:autoRedraw
-LEN:1
-NAME:backBrushStyle
-LEN:4
-NAME:backColor
-LEN:4
-NAME:borderStyle
-LEN:4
-NAME:bubbleHelp
-LEN:-1
-NAME:controlChildren
-LEN:12
-NAME:description
-LEN:-1
-NAME:disableEvents
-LEN:1
-NAME:disableReason
-LEN:-1
-NAME:dragCursor
-LEN:-1
-NAME:dragMode
-LEN:4
-NAME:drawFillColor
-LEN:4
-NAME:drawFillStyle
-LEN:4
-NAME:drawFontBold
-LEN:1
-NAME:drawFontItalic
-LEN:1
-NAME:drawFontName
-LEN:-1
-NAME:drawFontSize
-LEN:8
-NAME:drawFontStrikethru
-LEN:1
-NAME:drawFontUnderline
-LEN:1
-NAME:drawMode
-LEN:4
-NAME:drawStyle
-LEN:4
-NAME:drawTextAlign
-LEN:4
-NAME:drawTextCharRotation
-LEN:8
-NAME:drawTextRotation
-LEN:8
-NAME:drawWidth
-LEN:4
-NAME:drawWindow
-LEN:4
-NAME:enabled
-LEN:1
-NAME:height
-LEN:8
-NAME:helpContextId
-LEN:4
-NAME:helpKeyword
-LEN:-1
-NAME:ignoreSkin
-LEN:1
-NAME:left
-LEN:8
-NAME:mouseCursor
-LEN:-1
-NAME:mousePointer
-LEN:4
-NAME:name
-LEN:101
-NAME:scaleHeight
-LEN:8
-NAME:scaleLeft
-LEN:8
-NAME:scaleMode
-LEN:4
-NAME:scaleTop
-LEN:8
-NAME:scaleWidth
-LEN:8
-NAME:securityLevelEnabled
-LEN:4
-NAME:securityLevelVisible
-LEN:4
-NAME:skinCategoryName
-LEN:101
-NAME:tag
-LEN:-1
-NAME:top
-LEN:8
-NAME:userObject
-LEN:12
-NAME:userScript
-LEN:-1
-NAME:visible
-LEN:1
-NAME:width
-LEN:8
-NAME:_createdControls
-LEN:12
-NAME:_eventMappings
-LEN:-1
-NAME:_formBuildData
-LEN:-1
-NAME:_painterModifiedTimeStamp
-LEN:8
-NAME:_saveControlData
-LEN:12
-NAME:_webEnableHttpRequest
-LEN:1
-NAME:_webRegenPage
-LEN:1
-NAME:actualWindowState
-LEN:4
-NAME:allMenuItems
-LEN:12
-NAME:allowClose
-LEN:1
-NAME:allowDocking
-LEN:4
-NAME:applications
-LEN:12
-NAME:backBrush
-LEN:-1
-NAME:caption
-LEN:256
-NAME:clientHeight
-LEN:4
-NAME:clientWidth
-LEN:4
-NAME:clipControls
-LEN:1
-NAME:controlBox
-LEN:1
-NAME:controlList
-LEN:12
-NAME:formBuildDataTStrings
-LEN:12
-NAME:icon
-LEN:-1
-NAME:locale
-LEN:12
-NAME:maxButton
-LEN:1
-NAME:mdiChild
-LEN:4
-NAME:mdiClientScrollHorzPos
-LEN:4
-NAME:mdiClientScrollVertPos
-LEN:4
-NAME:mdiFrame
-LEN:1
-NAME:menuList
-LEN:12
-NAME:minButton
-LEN:1
-NAME:minimumHeight
-LEN:4
-NAME:minimumWidth
-LEN:4
-NAME:modalResult
-LEN:4
-NAME:paintedDialogBaseUnits
-LEN:4
-NAME:printerForm
-LEN:1
-NAME:scaleForm
-LEN:1
-NAME:scrollBars
-LEN:4
-NAME:scrollHorzPos
-LEN:4
-NAME:scrollVertPos
-LEN:4
-NAME:secureForm
-LEN:1
-NAME:topLevelMenuItems
-LEN:12
-NAME:userProfile
-LEN:12
-NAME:webBrowserAutoRefreshInterval
-LEN:4
-NAME:webBrowserAutoRefreshURL
-LEN:-1
-NAME:webBrowserDisableBackButton
-LEN:1
-NAME:webEncodingType
-LEN:1
-NAME:webFileName
-LEN:-1
-NAME:webForm
-LEN:1
-NAME:windowState
-LEN:4
-NAME:allFiles
-LEN:12
-NAME:fldFailFolder
-LEN:12
-NAME:fraAgents
-LEN:12
-NAME:fraAgentsTitle
-LEN:12
-NAME:fraFailures
-LEN:12
-NAME:fraFailuresTitle
-LEN:12
-NAME:fraFiles
-LEN:12
-NAME:fraMessages
-LEN:12
-NAME:jdbAgents
-LEN:12
-NAME:jdbFailures
-LEN:12
-NAME:jdbStatus
-LEN:12
-NAME:jdcTop
-LEN:12
-NAME:lblStatus
-LEN:12
-NAME:mnuDeleteFailure
-LEN:12
-NAME:mnuFailures
-LEN:12
-NAME:mnuViewFailure
-LEN:12
-NAME:shtfldFailFolderSheet1
-LEN:12
-NAME:shtfldFailFolderSheet2
-LEN:12
-NAME:tblAgents
-LEN:12
-NAME:tblFailures
-LEN:12
-NAME:tblFiles
-LEN:12

C://PATCH_CONTROL//TO/FormMessagingMonitor_initialize.txt DELETED Viewed

@@ -1,21 +0,0 @@
-initialize() updating;
-vars
-begin
-	inheritMethod();
-	mFormatAgentTable;
-	mLoadAgentTable;
-	mFormatFailuresTable;
-	shtfldFailFolderSheet1.visible := false;
-	//mLoadFailuresTable;
-	fraAgentsTitle.backColor := app.mGetColor(METRO_COLOR_RIBBON);
-	fraFailuresTitle.backColor := app.mGetColor(METRO_COLOR_RIBBON);
-	beginTimer(10000, Timer_Continuous, 12300);
-	timerEvent(12300);
-end;

C://PATCH_CONTROL//TO/FormMessagingMonitor_jdbAgents_userResize.txt DELETED Viewed

@@ -1,8 +0,0 @@
-jdbAgents_userResize(dockBar: JadeDockBar input) updating;
-vars
-begin
-	mCheckSectionHeight;
-end;

C://PATCH_CONTROL//TO/FormMessagingMonitor_jdbFailures_userResize.txt DELETED Viewed

@@ -1,19 +0,0 @@
-jdbFailures_userResize(dockBar: JadeDockBar input) updating;
-/*
-	Created	:	24 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	mCheckSectionHeight;
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMonitor_mCheckSectionHeight.txt DELETED Viewed

@@ -1,12 +0,0 @@
-mCheckSectionHeight() updating;
-vars
-begin
-	if jdbAgents.height < 24 then
-		jdbAgents.height := 24;
-	endif;
-end;

C://PATCH_CONTROL//TO/FormMessagingMonitor_mDeleteMessageFailure.txt DELETED Viewed

@@ -1,29 +0,0 @@
-mDeleteMessageFailure();
-/*
-	Created	:	24 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-	vMessage 	: Message;
-	vText		: String;
-	vResponse	: Integer;
-begin
-	vText := 'Are you sure you wish to delete this failed message.';
-	vResponse := app.msgBox(vText, LMS360, MsgBox_OK_Cancel + MsgBox_Exclamation_Mark_Icon);
-	if vResponse = MsgBox_Return_OK then
-		vMessage := tblFailures.accessRow(tblFailures.row).itemObject.Message;
-		beginTransaction;
-		delete vMessage;
-		commitTransaction;
-	endif;
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMonitor_mFormatAgentTable.txt DELETED Viewed

@@ -1,25 +0,0 @@
-mFormatAgentTable();
-/*
-	Created	:	16 September 2008 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	tblAgents.rows		:= tblAgents.fixedRows;
-	tblAgents.mSetColumnSorted(1, 'Worker', 0, Table.Alignment_Left, Table.SortType_Alpha);
-	tblAgents.mSetColumnSorted(2, 'Status', 0, Table.Alignment_Left, Table.SortType_Alpha);
-	tblAgents.mSetColumnSorted(3, 'Descriptor', 0, Table.Alignment_Left, Table.SortType_Alpha);
-	tblAgents.accessMode	:=	Table.AccessMode_Row;
-	tblAgents.selectMode 	:= Table.SelectMode_WholeRows;
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMonitor_mFormatFailuresTable.txt DELETED Viewed

@@ -1,34 +0,0 @@
-mFormatFailuresTable();
-/*
-	Created	:	24 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	tblFailures.rows		:= tblFailures.fixedRows;
-	tblFailures.mSetColumnSorted(1, 'Date/Time', 0, Table.Alignment_Left, Table.SortType_Alpha);
-	tblFailures.mSetColumnSorted(2, 'Reason', 0, Table.Alignment_Left, Table.SortType_Alpha);
-	tblFailures.mSetColumnSorted(3, 'File Name', 0, Table.Alignment_Left, Table.SortType_Alpha);
-	tblFailures.mSetColumnSorted(4, 'Description', 0, Table.Alignment_Left, Table.SortType_Alpha);
-	tblFailures.accessMode	:=	Table.AccessMode_Row;
-	tblFailures.selectMode 	:= Table.SelectMode_WholeRows;
-	tblFiles.rows		:= tblFailures.fixedRows;
-	tblFiles.columns := 1;
-	tblFiles.mSetColumnSorted(1, 'File', 0, Table.Alignment_Left, Table.SortType_Alpha);
-	tblFiles.accessMode	:=	Table.AccessMode_Row;
-	tblFiles.selectMode 	:= Table.SelectMode_WholeRows;
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMonitor_mLoadAgentTable.txt DELETED Viewed

@@ -1,21 +0,0 @@
-mLoadAgentTable();
-/*
-	Created	:	16 September 2008 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	tblAgents.rows := tblAgents.fixedRows;
-	tblAgents.mDisplayCollectionSorted(app.myMessagingRoot.allRunningWorkers, true, 0, null);
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMonitor_mLoadFailuresTable.txt DELETED Viewed

@@ -1,22 +0,0 @@
-mLoadFailuresTable();
-/*
-	Created	:	24 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	tblFailures.rows := tblFailures.fixedRows;
-	tblFailures.mDisplayCollectionSorted2(app.myMessagingRoot.allFailedMessages, true, 0, null);
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMonitor_mRefreshFailedFiles.txt DELETED Viewed

@@ -1,21 +0,0 @@
-mRefreshFailedFiles() serverExecution;
-//
-//	Created	:	10 September 2018 by ThabanS
-//
-//	Purpose	:
-//
-//	Notes	:
-//
-//	Date                 Who          Bug#     Description
-//  -------              ---          -----   ------------------------------------------------------------------------
-//
-vars
-begin
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMonitor_mViewMessageFailure.txt DELETED Viewed

@@ -1,25 +0,0 @@
-mViewMessageFailure();
-/*
-	Created	:	24 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-	vForm 		: FormMessageDetails;
-	vMessage 	: Message;
-begin
-	vMessage := tblFailures.accessRow(tblFailures.row).itemObject.Message;
-	create vForm transient;
-	vForm.mSetDetails(vMessage);
-	vForm.showModal;
-epilog
-	delete vForm;
-end;

C://PATCH_CONTROL//TO/FormMessagingMonitor_mnuDeleteFailure_click.txt DELETED Viewed

@@ -1,19 +0,0 @@
-mnuDeleteFailure_click(menuItem: MenuItem input) updating;
-/*
-	Created	:	24 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	mDeleteMessageFailure;
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMonitor_mnuViewFailure_click.txt DELETED Viewed

@@ -1,19 +0,0 @@
-mnuViewFailure_click(menuItem: MenuItem input) updating;
-/*
-	Created	:	24 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	mViewMessageFailure;
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMonitor_tblAgents_displayRow.txt DELETED Viewed

@@ -1,19 +0,0 @@
-tblAgents_displayRow(table: Table input; theSheet: Integer; obj: Object; theRow: Integer; bcontinue: Boolean io):String updating;
-/*
-	Created	:	16 September 2008 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	return obj.MessagingWorker.mTableDisplay;
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMonitor_tblFailures_contextMenu.txt DELETED Viewed

@@ -1,41 +0,0 @@
-tblFailures_contextMenu(table: Table input; conwin: Window input; mouse: Boolean; x: Integer; y: Integer):Boolean updating;
-/*
-	Created	:	24 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-	x1 				: Real;
-	y1 				: Real;
-	vRecentIndex 	: Integer;
-	vRow			: Integer;
-	vCol 			: Integer;
-	vMessage		: Message;
-begin
-	if table.row = table.fixedRows then
-		return false;
-	endif;
-	vMessage := table.accessRow(table.row).itemObject.Message;
-	x1 := x;
-	y1 := y;
-	table.windowToScreen(x1, y1);
-	screenToWindow(x1, y1);
-	mnuViewFailure.enabled := vMessage <> null;
-	mnuDeleteFailure.enabled := vMessage <> null;
-	popupMenu(mnuFailures, x1.Integer, y1.Integer);
-	return false;
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMonitor_tblFailures_displayRow.txt DELETED Viewed

@@ -1,22 +0,0 @@
-tblFailures_displayRow(table: Table input; theSheet: Integer; obj: Object; theRow: Integer; bcontinue: Boolean io):String updating;
-/*
-	Created	:	24 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	if theRow <= 600 and obj.Message.aFileName <> null and (app.actualTime-obj.Message.creationTime).cnDays > 3*30 then
-		return obj.Message.mTableDisplay;
-	endif;
-	return null;
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMonitor_tblFiles_dblClick.txt DELETED Viewed

@@ -1,31 +0,0 @@
-tblFiles_dblClick(table: Table input) updating;
-//
-//	Created	:	07 December 2018 by ThabanS
-//
-//	Purpose	:
-//
-//	Notes	:
-//
-//	Date                 Who          Bug#     Description
-//  -------              ---          -----   ------------------------------------------------------------------------
-//
-vars
-	vFile : String;
-begin
-	vFile := tblFiles.getCellText(tblFiles.row,tblFiles.column);
-	if vFile <> null and global.mAskYesNo('Re-ingest file : ' & vFile) then
-		write app.mGetMsgProcessorErrorFilesDir & vFile;
-		write app.mGetMessageProcessorReceive2 & vFile.mReplaceString('Error_',null);
-		app.mMoveFileServer(app.mGetMsgProcessorErrorFilesDir & vFile, app.mGetMessageProcessorReceive2 & vFile);
-	endif;
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMonitor_tblFiles_displayRow.txt DELETED Viewed

@@ -1,22 +0,0 @@
-tblFiles_displayRow(table: Table input; theSheet: Integer; obj: Object; theRow: Integer; bcontinue: Boolean io):String updating;
-//
-//	Created	:	07 December 2018 by ThabanS
-//
-//	Purpose	:
-//
-//	Notes	:
-//
-//	Date                 Who          Bug#     Description
-//  -------              ---          -----   ------------------------------------------------------------------------
-//
-vars
-begin
-	return obj.CoreKeyValueNode.aStringVal;
-epilog
-end;

C://PATCH_CONTROL//TO/FormMessagingMonitor_tblFiles_keyDown.txt DELETED Viewed

@@ -1,40 +0,0 @@
-tblFiles_keyDown(table: Table input; keyCode: Integer io; shift: Integer) updating;
-//
-//	Created	:	07 December 2018 by ThabanS
-//
-//	Purpose	:
-//
-//	Notes	:
-//
-//	Date                 Who          Bug#     Description
-//  -------              ---          -----   ------------------------------------------------------------------------
-//
-vars
-	vRow	: Integer;
-	vArray : CnStringArrayv2;
-	vFile2 : String;
-begin
-	if keyCode = J_key_Delete and global.mAskYesNo('Delete Files?') then
-		create vArray transient;
-		foreach vRow in tblFiles.fixedRows+1 to tblFiles.rows where vRow <= tblFiles.rows do
-			if tblFiles.accessRow(vRow).selected then
-				vArray.add(app.mGetMsgProcessorErrorFilesDir & tblFiles.getCellText(vRow,1));
-				tblFiles.accessRow(vRow).visible := false;
-			endif;
-		endforeach;
-		foreach vFile2 in vArray do
-			app.mDeleteFileServer(vFile2);
-		endforeach;
-	endif;
-epilog
-	delete vArray;
-end;

C://PATCH_CONTROL//TO/FormMessagingMonitor_timerEvent.txt DELETED Viewed

@@ -1,31 +0,0 @@
-timerEvent(eventTag: Integer) updating;
-//
-//	Created	:	07 December 2018 by ThabanS
-//
-//	Purpose	:
-//
-//	Notes	:
-//
-//	Date                 Who          Bug#     Description
-//  -------              ---          -----   ------------------------------------------------------------------------
-//
-vars
-	vFile : String;
-	vAns : CnStringArrayv2;
-begin
-	if eventTag = 12300 then
-		tblFiles.mClearToFixedRows;
-		vAns := app.mGetErrorFiles;
-		foreach vFile in vAns do
-			tblFiles.mAddRow(vFile, null);
-		endforeach;
-	endif;
-epilog
-	delete vAns;
-end;

C://PATCH_CONTROL//{TO → FROM}/FormPoolAddComponent_mValidate.txt RENAMED Viewed

@@ -45,6 +45,12 @@ begin
 			vValidated := false;
 			continue;
 		endif;
 		allValidatedPackCompLinks.add( vPackCompLink);
 	endforeach;

 			vValidated := false;
 			continue;
 		endif;
+		// #HTB-1479 NormanA 13Nov22 {124658} : don't add pledged loans
+		if vShadComp.myComponent.myAccount.myUnderwritingData.getPledgedAccount <> null then
+			vResult := vResult & 'Cannot add loan to Pool as it is pledged to a Financial Institution.';
+			vValidated := false;
+			continue;
+		endif;
 		allValidatedPackCompLinks.add( vPackCompLink);
 	endforeach;

C://PATCH_CONTROL//{TO → FROM}/FormRenewalWizard_mPopulateFormFromRenewalEvntFO.txt RENAMED Viewed

@@ -67,12 +66,21 @@ begin
 		vAllocation := vAllocationGrp.allAllocationItems.mFindByInternalContact(vRenewalEvent.myOrigRenewalEvent.myAllocatedContact, self.myCalculator.myAccount);
 		if vAllocation = null and vAllocationGrp.allAllocationItemsByEmpl[vRenewalEvent.myOrigRenewalEvent.myAllocatedContact.myEmployee] = null then
 				create vAllocationTemp transient;
 				vAllocationTemp.mSetAllocationGroup(vRenewalEvent.myOrigRenewalEvent.myAllocatedContact.myTeam);
 				vAllocationTemp.mSetEmployee(vRenewalEvent.myOrigRenewalEvent.myAllocatedContact.myEmployee);
 				vList.add(vAllocationTemp);
 				cboAllocateTo.listCollection(vList, false, 0);
 				cboAllocateTo.listObject := vAllocationTemp;
 		elseif vAllocationGrp.allAllocationItemsByEmpl[vRenewalEvent.myOrigRenewalEvent.myAllocatedContact.myEmployee] <> null then
 			cboAllocateTo.listObject := vAllocationGrp.allAllocationItemsByEmpl[vRenewalEvent.myOrigRenewalEvent.myAllocatedContact.myEmployee];
 		else

 		vAllocation := vAllocationGrp.allAllocationItems.mFindByInternalContact(vRenewalEvent.myOrigRenewalEvent.myAllocatedContact, self.myCalculator.myAccount);
 		if vAllocation = null and vAllocationGrp.allAllocationItemsByEmpl[vRenewalEvent.myOrigRenewalEvent.myAllocatedContact.myEmployee] = null then
+			//#HTB-895 SaulL 22Dec21 {124115}: If Allocated Contact is an inactive user, assign the first Active one in the list
+			if vRenewalEvent.myOrigRenewalEvent.myAllocatedContact.myEmployee.myUser <> null and
+			vRenewalEvent.myOrigRenewalEvent.myAllocatedContact.myEmployee.myUser.myStatus = app.mGetTerminology(TT_LOGON_STATUS,INACTIVE) then
+				// #HTB-895 SaulL 15Jun22 {124115}: Find the first Active Employee in the list and directly assign it to the Drop-down list listObject
+				cboAllocateTo.listObject := cboAllocateTo.getCollection.first.AllocatedAccounts;
+			//#HTB-895 SaulL 16Jun22 {124115}: when the allocated user is active, just display the user
+			else
 				create vAllocationTemp transient;
 				vAllocationTemp.mSetAllocationGroup(vRenewalEvent.myOrigRenewalEvent.myAllocatedContact.myTeam);
 				vAllocationTemp.mSetEmployee(vRenewalEvent.myOrigRenewalEvent.myAllocatedContact.myEmployee);
 				vList.add(vAllocationTemp);
 				cboAllocateTo.listCollection(vList, false, 0);
 				cboAllocateTo.listObject := vAllocationTemp;
+			endif;
+			//End of #HTB-895
 		elseif vAllocationGrp.allAllocationItemsByEmpl[vRenewalEvent.myOrigRenewalEvent.myAllocatedContact.myEmployee] <> null then
 			cboAllocateTo.listObject := vAllocationGrp.allAllocationItemsByEmpl[vRenewalEvent.myOrigRenewalEvent.myAllocatedContact.myEmployee];
 		else

C://PATCH_CONTROL//FROM/FormWorkPackageTransaction_mGetFundsTypes.txt ADDED Viewed

	@@ -0,0 +1,45 @@

+mGetFundsTypes(): FundsTypeDict;
+/*************************************************************************************************
+Date Created:	24 June 2022
+Created By:		MarkusJ
+Method Name:	mGetFundsTypes
+Patch Number:	124482
+Ticket:			HTB-1532
+Purpose:		Get FundsType dict for table display on parent form methods - caller to delete dict obj
+Date	Ticket	Patch	Who			Description
+-------	------	------	-----------	--------------------------------------------------------------
+ddMMMyy
+*************************************************************************************************/
+vars
+	vPackage				: Package;
+	vPackageComponent		: PackageComponentLink;
+	vFundsTypes				: FundsTypeDict;
+	vFundsType				: FundsType;
+begin
+	vPackage := mGetPrimaryObject.Package;
+	create vFundsTypes transient;
+	foreach vPackageComponent in vPackage.allPackCompLinks discreteLock do
+		foreach vFundsType in vPackageComponent.myShadowComponent.myComponent.myAccount.mySubLedger.allFundsTypesUsed discreteLock do
+			if not vFundsTypes.includes(vFundsType) and not vFundsType.mIsSystemManaged then
+				vFundsTypes.add(vFundsType);
+			endif;
+		endforeach;
+		foreach vFundsType in vPackageComponent.mySubLedger.allFundsTypesUsed discreteLock do
+			if not vFundsTypes.includes(vFundsType) and not vFundsType.mIsSystemManaged then
+				vFundsTypes.add(vFundsType);
+			endif;
+		endforeach;
+	endforeach;
+	return vFundsTypes;
+epilog
+end;

C://PATCH_CONTROL//FROM/FormWorkTransaction_mGetFundsTypes.txt ADDED Viewed

	@@ -0,0 +1,34 @@

+mGetFundsTypes(): FundsTypeDict;
+/*************************************************************************************************
+Date Created:	24 June 2022
+Created By:		MarkusJ
+Method Name:	mGetFundsTypes
+Patch Number:	124482
+Ticket:			HTB-1532
+Purpose:		Get FundsType dict for table display - caller to delete dict obj
+Date	Ticket	Patch	Who			Description
+-------	------	------	-----------	--------------------------------------------------------------
+ddMMMyy
+*************************************************************************************************/
+vars
+	vAccount 	: Account;
+	vFundsTypes	: FundsTypeDict;
+begin
+	create vFundsTypes transient;
+	if mGetPrimaryObject.class = Account then
+		vAccount := mGetPrimaryObject.Account;
+		vAccount.mySubLedger.allFundsTypesUsed.copy(vFundsTypes);
+	elseif mGetPrimaryObject.class = Municipality then
+		mGetPrimaryObject.Municipality.allLenderLinks[app.myLender.virtName].mySubLedger.allFundsTypesUsed.copy(vFundsTypes);
+	endif;
+	return vFundsTypes;
+epilog
+end;

C://PATCH_CONTROL//{TO → FROM}/FormWorkTransaction_mLoadFundsTypeTable.txt RENAMED Viewed

@@ -15,6 +15,8 @@ vars
 begin
 	create vFundsTypes transient;
 	if mGetPrimaryObject.class = Account then
@@ -23,8 +25,8 @@ begin
 	elseif mGetPrimaryObject.class = Municipality then
 		mGetPrimaryObject.Municipality.allLenderLinks[app.myLender.virtName].mySubLedger.allFundsTypesUsed.copy(vFundsTypes);
 	endif;
 		create vSelected transient;
 		vFundsTypes.copy(vSelected);

 begin
+	// #HTB-1532 MarkusJ 24Jun22 {124482} : Refactor into own method to include child form logic
+	/*
 	create vFundsTypes transient;
 	if mGetPrimaryObject.class = Account then
 	elseif mGetPrimaryObject.class = Municipality then
 		mGetPrimaryObject.Municipality.allLenderLinks[app.myLender.virtName].mySubLedger.allFundsTypesUsed.copy(vFundsTypes);
 	endif;
+	*/
+	vFundsTypes := mGetFundsTypes;
 		create vSelected transient;
 		vFundsTypes.copy(vSelected);

C://PATCH_CONTROL//{TO → FROM}/FundingAddress_mAnonymize.txt RENAMED Viewed

@@ -98,14 +98,13 @@ begin
 			vGeneratedAddress := vAnonymizer.generateStreetAddress;
 			vFullAddress := vGeneratedAddress.mBuildAddress(CrLf,false);
-			vCity := vGeneratedAddress.aCity;
 			vMailingAddress := vGeneratedAddress.mBuildAddress(" ",true);
 			// #HTB-432 Gaurav 08Dec20 {123290} : Keep Postal Code anon rules consistent.
 			vPostalCode := aPostalCode[1:3].String & "0X0";
-			if vGeneratedAddress.myProvinceNEW <> null then
-				vProvince := vGeneratedAddress.myProvinceNEW.mGetKeyName;
-			endif;
 		endif;

 			vGeneratedAddress := vAnonymizer.generateStreetAddress;
 			vFullAddress := vGeneratedAddress.mBuildAddress(CrLf,false);
+			// #HTB-1482 MarkusJ 09Nov22 {124733} : Keep City Anon Rules Consitent
+			vCity := aCity;
 			vMailingAddress := vGeneratedAddress.mBuildAddress(" ",true);
 			// #HTB-432 Gaurav 08Dec20 {123290} : Keep Postal Code anon rules consistent.
 			vPostalCode := aPostalCode[1:3].String & "0X0";
+			// #HTB-1482 MarkusJ 09Nov22 {124733} : Keep Province Anon Rules Consitent
+			vProvince := aProvince;
 		endif;

C://PATCH_CONTROL//TO/GMessagingSchema_class_info.txt DELETED Viewed

@@ -1,24 +0,0 @@
-GMessagingSchema
-MAP:Message
-NAME:_persistentImpRefs
-LEN:12
-NAME:_transientImpRefs
-LEN:12
-NAME:_systemBasic
-LEN:1
-NAME:aVersion
-LEN:16

C://PATCH_CONTROL//{TO → FROM}/GeneralTxnAgent_trxUpdateFeeCode.txt RENAMED Viewed

@@ -35,7 +35,9 @@ trxUpdateFeeCode(	pFeeCode			: FeeCode io;
 					pMultiplyTerm		: Terminology;
 					// #CTC-419 ChristopherD 30Nov20 {123305} : Adding to a new attribute
 					pFullyAmortizeOnSaleToInvestor : Boolean;
-					pFeeCodeInvestorTypeLinkDict : FeeCodeInvestorTypeLinkByInvTypeDict
 					) updating;
 /*************************************************************************************************
@@ -50,6 +52,7 @@ Date	Ticket		Patch	Who			Description
 -------	------		------	-----------	--------------------------------------------------------------
 19May20	HTB-101		122903	ThabanS		added pLocaleDict
 12Apr22	HTB-1355	124293	Markus		added pFeeCodeInvestorTypeLinkDict for FeeCodeInvestorTypeLinks on Sale
 *************************************************************************************************/
 vars
@@ -102,8 +105,9 @@ begin
 							pDepositTxn,
 							pMultiplyTerm,
 							// #CTC-419 ChristopherD 04Dec20 {123305} : New property
-							pFullyAmortizeOnSaleToInvestor
-							);
 	// #HTB-101 ThabanS 19May20 {122903} : added locale save
 	if pLocaleDict <> null then

 					pMultiplyTerm		: Terminology;
 					// #CTC-419 ChristopherD 30Nov20 {123305} : Adding to a new attribute
 					pFullyAmortizeOnSaleToInvestor : Boolean;
+					pFeeCodeInvestorTypeLinkDict : FeeCodeInvestorTypeLinkByInvTypeDict;
+					//#HTB-1433 SaulL 04Nov22 {124813}: Adding a new property, aNotIncludedInAdvStm
+					pNotIncludedInAdvStm	: Boolean
 					) updating;
 /*************************************************************************************************
 -------	------		------	-----------	--------------------------------------------------------------
 19May20	HTB-101		122903	ThabanS		added pLocaleDict
 12Apr22	HTB-1355	124293	Markus		added pFeeCodeInvestorTypeLinkDict for FeeCodeInvestorTypeLinks on Sale
+04Nov22	HTB-1433   	124813 	SaulL 		Adding a new property, aNotIncludedInAdvStm
 *************************************************************************************************/
 vars
 							pDepositTxn,
 							pMultiplyTerm,
 							// #CTC-419 ChristopherD 04Dec20 {123305} : New property
+							pFullyAmortizeOnSaleToInvestor,
+							//#HTB-1433 SaulL 04Nov22 {124813}: Adding a new property, aNotIncludedInAdvStm
+							pNotIncludedInAdvStm);
 	// #HTB-101 ThabanS 19May20 {122903} : added locale save
 	if pLocaleDict <> null then

C://PATCH_CONTROL//{TO → FROM}/GeneralTxnAgent_trxUpdateInvestorType.txt RENAMED Viewed

@@ -14,7 +14,8 @@ trxUpdateInvestorType(	pInvestorType : InvestorType io;
 						pLOB			: Terminology;
 						pPostToCurrentInvestor : Boolean;
 						pIgnorePoolCriteriaAutoSale : Boolean;
-						pUseInvestorBankFund : Boolean
 						) : Boolean updating;
 //Ticket 10102 - AlexanderV - 2018-04-30 - added pOvernightRemittancePosting
 //
@@ -101,6 +102,10 @@ begin
 	// #HTB-1315 ThabanS 14Feb22 {124196} :  added chkUseInvestorBankFund
 	pInvestorType.setUseInvestorBankAccountOnSale(pUseInvestorBankFund);
 	vAudit.mCompleteAudit;
 	mCommitTrxTransaction;

 						pLOB			: Terminology;
 						pPostToCurrentInvestor : Boolean;
 						pIgnorePoolCriteriaAutoSale : Boolean;
+						pUseInvestorBankFund : Boolean;
+						pDefaultPool : String
 						) : Boolean updating;
 //Ticket 10102 - AlexanderV - 2018-04-30 - added pOvernightRemittancePosting
 //
 	// #HTB-1315 ThabanS 14Feb22 {124196} :  added chkUseInvestorBankFund
 	pInvestorType.setUseInvestorBankAccountOnSale(pUseInvestorBankFund);
+	// #HTB-1479 NormanA 31Oct22 {124658} : add planning pool text to update Investor type
+	if pDefaultPool <> null then
+		pInvestorType.mSetDefaultPool(pDefaultPool);
+	endif;
 	vAudit.mCompleteAudit;
 	mCommitTrxTransaction;

C://PATCH_CONTROL//{TO → FROM}/Individual_class_info.txt RENAMED Viewed

@@ -161,7 +161,7 @@ Terminology Type:  CONTACT_TIME
 NAME:myPrimaryLanguage
 LEN:12
-PrimaryLanguage
 Terminology Type:  LANGUAGE

 NAME:myPrimaryLanguage
 LEN:12
+Contact Language
 Terminology Type:  LANGUAGE

C://PATCH_CONTROL//{TO → FROM}/InvestorType_class_info.txt RENAMED Viewed

@@ -87,6 +87,11 @@ LEN:1
 Components Full
 NAME:aFlowPaymentTxns
 LEN:1
 FLow Payments Txns

 Components Full
+NAME:aDefaultPool
+LEN:31
 NAME:aFlowPaymentTxns
 LEN:1
 FLow Payments Txns

C://PATCH_CONTROL//FROM/InvestorType_mGetDefaultPool.txt ADDED Viewed

	@@ -0,0 +1,18 @@

+mGetDefaultPool(): String;
+/*************************************************************************************************
+Date Created:	31 October 2022
+Created By:		NormanA
+Method Name:	mGetDefaultPool
+Patch Number:	124658
+Ticket:			HTB-1479
+Purpose:		Return default pool
+Date	Ticket	Patch	Who			Description
+-------	------  ------	-----------	--------------------------------------------------------------
+ddMMMyy
+*************************************************************************************************/
+vars
+begin
+	return aDefaultPool;
+end;

C://PATCH_CONTROL//FROM/InvestorType_mSetDefaultPool.txt ADDED Viewed

	@@ -0,0 +1,18 @@

+mSetDefaultPool(pDefaultPool: String) updating;
+/*************************************************************************************************
+Date Created:	31 October 2022
+Created By:		NormanA
+Method Name:	mSetDefaultPool
+Patch Number:	124658
+Ticket:			HTB-1479
+Purpose:		Set Default pool
+Date	Ticket	Patch	Who			Description
+-------	------  ------	-----------	--------------------------------------------------------------
+ddMMMyy
+*************************************************************************************************/
+vars
+begin
+	aDefaultPool := pDefaultPool;
+end;

C://PATCH_CONTROL//FROM/JobExtractsPledgedLoans_class_info.txt ADDED Viewed

	@@ -0,0 +1,161 @@

+JobExtractsPledgedLoans
+MAP:JobGeneral
+Date Created:   27 September 2022
+Created By:     NormanA
+Class Name:     JobExtractsPledgedLoans
+Patch Number:   124658
+Ticket:         HTB-1479
+Purpose:        Modify Loans' Pledged Accounts based on input csv file
+NAME:_persistentImpRefs
+LEN:12
+NAME:_transientImpRefs
+LEN:12
+NAME:aDeleted
+LEN:1
+NAME:aDescriptor
+LEN:257
+NAME:aEmailStatus
+LEN:31
+NAME:aEnableDate
+LEN:4
+The job or deck will be disabled until this date.
+NAME:aEnabled
+LEN:4
+A job, deck job, or deck can be temporarily disabled.
+If a deck job, it will be skipped without having to remove the job
+from the deck or alter the schedule.
+NAME:aFileRouted
+LEN:1
+NAME:aThreaded
+LEN:1
+NAME:allScheduledJobRuns
+LEN:12
+NAME:myAuxData
+LEN:12
+NAME:myJobRoot
+LEN:12
+NAME:mySchedule
+LEN:12
+NAME:aRetry
+LEN:1
+NAME:aRetryAttempts
+LEN:4
+NAME:aStopDeckOnFailure
+LEN:1
+NAME:aTimeBetweenRetrys
+LEN:4
+NAME:myJobDeck
+LEN:12
+NAME:aEntityName
+LEN:31
+Run a job for this selected entity.
+(e.g. Lender Name, Creditor Name, etc)
+NAME:aIsReportOnly
+LEN:31
+NAME:aIsTestRun
+LEN:31
+NAME:aOutputDirectory
+LEN:-1
+NAME:aOutputFile
+LEN:-1
+NAME:aDestinationDirectory
+LEN:-1
+Date Created:   27 September 2022
+Created By:     NormanA
+Property Name:  aDestinationDirectory
+Patch Number:   124658
+Ticket:         HTB-1479
+Purpose:        Destination Directory
+NAME:aInputDirectory
+LEN:-1
+Date Created:   27 September 2022
+Created By:     NormanA
+Property Name:  aInputDirectory
+Patch Number:   124658
+Ticket:         HTB-1479
+Purpose:        Input file path
+NAME:myLender
+LEN:12
+Date Created:   27 September 2022
+Created By:     NormanA
+Property Name:  myLender
+Patch Number:   124658
+Ticket:         HTB-1479
+Purpose:        Lending Institution

C://PATCH_CONTROL//FROM/JobExtractsPledgedLoans_mGetParamStrings.txt ADDED Viewed

	@@ -0,0 +1,40 @@

+mGetParamStrings(pParameters: HugeStringArray io);
+/*************************************************************************************************
+Date Created:	27 September 2022
+Created By:		NormanA
+Method Name:	mGetParamStrings
+Patch Number:	124658
+Ticket:			HTB-1479
+Purpose:		Get Parameter Strings
+Date	Ticket	Patch	Who			Description
+-------	------  ------	-----------	--------------------------------------------------------------
+ddMMMyy
+*************************************************************************************************/
+vars
+	vLender: 		String;
+	vDestinationDirectory: 	String;
+	vInputFileName: String;
+begin
+	if myLender <> null then
+		vLender := myLender.mGetName;
+	endif;
+	vDestinationDirectory := aDestinationDirectory;
+	if vDestinationDirectory = null then
+		vDestinationDirectory := app.mGetINIFileSetting('LMSEnvironment', 'ExportPathGeneric', null);
+	endif;
+	vInputFileName := aInputDirectory;
+	pParameters.add('Lender' & Tab & vLender);
+	pParameters.add('Pledged Loan Extract CSV File' & Tab & vInputFileName);
+	pParameters.add('Destination Dir' & Tab & vDestinationDirectory);
+epilog
+end;

C://PATCH_CONTROL//FROM/JobExtractsPledgedLoans_mListParams.txt ADDED Viewed

	@@ -0,0 +1,9 @@

+mListParams(pHelper: JobHelper);
+vars
+begin
+	pHelper.mWriteToLog("Lender " & Tab & myLender.mGetName);
+	pHelper.mWriteToLog("Pledged Loan Extract CSV File " & Tab & aInputDirectory);
+	pHelper.mWriteToLog("Destination " & Tab & aDestinationDirectory);
+end;

C://PATCH_CONTROL//FROM/JobExtractsPledgedLoans_mName.txt ADDED Viewed

	@@ -0,0 +1,26 @@

+mName(): String;
+/*************************************************************************************************
+Date Created:	27 September 2022
+Created By:		NormanA
+Method Name:	mName
+Patch Number:	124658
+Ticket:			HTB-1479
+Purpose:		Job Name
+Date	Ticket	Patch	Who			Description
+-------	------  ------	-----------	--------------------------------------------------------------
+ddMMMyy
+*************************************************************************************************/
+vars
+begin
+	return "Pledged Loan - Import";
+epilog
+end;

C://PATCH_CONTROL//FROM/JobExtractsPledgedLoans_mRun.txt ADDED Viewed

	@@ -0,0 +1,172 @@

+mRun(pHelper: JobHelper io): Boolean updating;
+/*************************************************************************************************
+Date Created:	27 September 2022
+Created By:		NormanA
+Method Name:	mRun
+Patch Number:	124658
+Ticket:			HTB-1479
+Purpose:		Job to set Loans Pledged Accounts based on the given csv file
+Date	Ticket	Patch	Who			Description
+-------	------  ------	-----------	--------------------------------------------------------------
+ddMMMyy
+*************************************************************************************************/
+vars
+	vInputDataFile:		File;
+	vOutputDataFile:	File;
+	vReportDataFile:	File;
+	vReadLine:			String;
+	vWriteLine:			String;
+	vPos:				Integer;
+	vAccount:			Account;
+	vAccountID:			String;
+	vInputPI:			String;
+	vBool:				String;
+	vLender:			Lender;
+	vPledgedInstitution: Terminology;
+	vTotalLoansPledged:	Integer;
+	vTotalLoansRemoved:	Integer;
+	vTotalLoansUpdated:	Integer;
+begin
+	vTotalLoansPledged := 0;
+	vTotalLoansRemoved := 0;
+	create vInputDataFile transient;
+	// validate if path exists on the server
+	vInputDataFile.fileName := aInputDirectory;
+	if not vInputDataFile.isAvailable then
+		pHelper.mWriteToLog("Input File not found.");
+		return false;
+	endif;
+	vInputDataFile.kind := vInputDataFile.Kind_Unknown_Text;
+	vInputDataFile.mode := vInputDataFile.Mode_Input;
+	vInputDataFile.open;
+	pHelper.mWriteToLog("---Pledged Loan Extract Starting--");
+	create vOutputDataFile transient;
+	vOutputDataFile.fileName := aDestinationDirectory & "PledgedAccountsReport_" & app.mGetSystemDate.format('ddMMMyyyy') & "_CSV.csv";
+	vOutputDataFile.kind := vOutputDataFile.Kind_Unknown_Text;
+	vOutputDataFile.mode := vOutputDataFile.Mode_Output;
+	vOutputDataFile.open;
+	// #HTB-1479 NormanA 03Nov22 {124658} : adding Loan Status to the report
+	vOutputDataFile.writeLine("Loan# , Before , After, Loan Status");
+	create vReportDataFile transient;
+	vReportDataFile.fileName := aDestinationDirectory & "\PledgedAccountsReport_" & app.mGetSystemDate.format('ddMMMyyyy') & "_TXT.txt";
+	vReportDataFile.kind := vReportDataFile.Kind_Unknown_Text;
+	vReportDataFile.mode := vReportDataFile.Mode_Output;
+	vReportDataFile.open;
+	vLender := myLender;
+	// discard first row of column headings;
+	vInputDataFile.readLine;
+	app.myGeneralTxnAgent.mBeginTrxTransaction;
+	while not vInputDataFile.endOfFile do
+		vReadLine := vInputDataFile.readLine;
+		vPos := 1;
+		vAccountID := vReadLine.scanUntil(",", vPos).trimBlanks;
+		vAccount := vLender.allAccounts[vAccountID];
+		if vAccount <> null then
+			vPos := vPos + 1;
+			vInputPI := vReadLine.scanUntil(",", vPos).trimBlanks;
+			vPos := vPos + 1;
+			vBool := vReadLine.scanUntil(",", vPos).trimBlanks;
+			if vInputPI.String.length = 0 then
+				vWriteLine := "- Loan " & vAccountID & " not updated. " & vInputPI & " Instituition cannot be found.";
+				vReportDataFile.writeLine(vWriteLine);
+				pHelper.mWriteToLog(vWriteLine);
+				continue;
+			endif;
+			if vBool.String.toUpper <> "YES" and vBool.String.toUpper <> "NO" then
+				vWriteLine := "- Loan " & vAccountID & " not updated. Yes/No Action is not properly set.";
+				vReportDataFile.writeLine(vWriteLine);
+				pHelper.mWriteToLog(vWriteLine);
+				continue;
+			endif;
+			if vBool.String.toUpper = "YES" and vInputPI <> "" then
+				if app.mGetTerminology(TT_PLEDGED_ACCOUNT,vInputPI) = null then
+					vWriteLine := "- Loan " & vAccountID & " not updated. " & vInputPI & " Instituition cannot be found.";
+					vReportDataFile.writeLine(vWriteLine);
+					pHelper.mWriteToLog(vWriteLine);
+					continue;
+				endif;
+				vPledgedInstitution := app.mGetTerminology(TT_PLEDGED_ACCOUNT,vInputPI);
+				if vAccount.myStatus.mGetKeyName <> KN_ACTIVE then
+					vWriteLine := "- Loan " & vAccountID & " Cannot be updated because loan Status is not Active.";
+					vReportDataFile.writeLine(vWriteLine);
+					pHelper.mWriteToLog(vWriteLine);
+				elseif vAccount.myUnderwritingData.getPledgedAccount = vPledgedInstitution then
+					vWriteLine := "- Loan " & vAccountID & " is already pledged to FI, no updates made.";
+					vReportDataFile.writeLine(vWriteLine);
+					pHelper.mWriteToLog(vWriteLine);
+					vTotalLoansPledged := vTotalLoansPledged + 1;
+				else
+					vAccount.myUnderwritingData.setPledgedAccount(vPledgedInstitution);
+					// #HTB-1479 NormanA 03Nov22 {124658} : adding Loan status to the report
+					vWriteLine := vAccountID & " ,  , " & vAccount.myUnderwritingData.getPledgedAccount.mGetKeyName & ", " & vAccount.myStatus.mGetKeyName;
+					vOutputDataFile.writeLine(vWriteLine);
+					vWriteLine := "- Loan " & vAccountID & " has been pledged to " & vAccount.myUnderwritingData.getPledgedAccount.mGetKeyName;
+					vReportDataFile.writeLine(vWriteLine);
+					pHelper.mWriteToLog(vWriteLine);
+					vTotalLoansPledged := vTotalLoansPledged + 1;
+				endif;
+			else
+				if vAccount.myUnderwritingData.getPledgedAccount <> null then
+					// #HTB-1479 NormanA 03Nov22 {124658} : adding Loan status to the report
+					vWriteLine := vAccountID & " , " & vAccount.myUnderwritingData.getPledgedAccount.mGetKeyName & " , , " & vAccount.myStatus.mGetKeyName;
+					vOutputDataFile.writeLine(vWriteLine);
+					vTotalLoansRemoved := vTotalLoansRemoved + 1;
+				endif;
+				vAccount.myUnderwritingData.setPledgedAccount(null);
+				vWriteLine := "- Loan " & vAccountID & " Pledged Account set to null";
+				pHelper.mWriteToLog(vWriteLine);
+				vReportDataFile.writeLine(vWriteLine);
+			endif;
+		else
+			vWriteLine := "- Loan ID " & vAccountID & " not found.";
+			pHelper.mWriteToLog(vWriteLine);
+			vReportDataFile.writeLine(vWriteLine);
+		endif;
+	endwhile;
+	app.myGeneralTxnAgent.mCommitTrxTransaction;
+	vOutputDataFile.writeLine("");
+	vReportDataFile.writeLine("");
+	pHelper.mWriteToLog("");
+	vTotalLoansUpdated := vTotalLoansPledged + vTotalLoansRemoved;
+	vOutputDataFile.writeLine("Total Loans Remaining , " & vTotalLoansPledged.String);
+	vReportDataFile.writeLine("Total Loans Remaining : " & vTotalLoansPledged.String);
+	pHelper.mWriteToLog("Total Loans Remaining : " & vTotalLoansPledged.String);
+	vOutputDataFile.writeLine("Total Loans Removed , " & vTotalLoansRemoved.String);
+	vReportDataFile.writeLine("Total Loans Removed : " & vTotalLoansRemoved.String);
+	pHelper.mWriteToLog("Total Loans Removed : " & vTotalLoansRemoved.String);
+	vOutputDataFile.writeLine("Total Loans Updated , " & vTotalLoansUpdated.String);
+	vReportDataFile.writeLine("Total Loans Updated : " & vTotalLoansUpdated.String);
+	pHelper.mWriteToLog("Total Loans Updated : " & vTotalLoansUpdated.String);
+	pHelper.mWriteToLog("Pledge Loan Extract Finished.");
+	vInputDataFile.close;
+	vOutputDataFile.close;
+	vReportDataFile.close;
+	return true;
+epilog
+	delete vInputDataFile;
+	delete vOutputDataFile;
+	delete vReportDataFile;
+end;

C://PATCH_CONTROL//FROM/JobExtractsPledgedLoans_mSetParameters.txt ADDED Viewed

	@@ -0,0 +1,26 @@

+mSetParameters(pParameters: HugeStringArray) updating;
+/*************************************************************************************************
+Date Created:	27 September 2022
+Created By:		NormanA
+Method Name:	mSetParameters
+Patch Number:	124658
+Ticket:			HTB-1479
+Purpose:		Set Job parameters
+Date	Ticket	Patch	Who			Description
+-------	------  ------	-----------	--------------------------------------------------------------
+ddMMMyy
+*************************************************************************************************/
+vars
+begin
+	myLender 					:= app.myInstitution.allLenders[pParameters[1]];
+	aInputDirectory				:= pParameters[2].trimBlanks;
+	aDestinationDirectory 		:= pParameters[3].trimBlanks;
+epilog
+end;

C://PATCH_CONTROL//FROM/JobExtractsPledgedLoans_mValidateParams.txt ADDED Viewed

	@@ -0,0 +1,52 @@

+mValidateParams(pParameters: HugeStringArray io; pIndex: Integer output);
+/*************************************************************************************************
+Date Created:	29 September 2022
+Created By:		NormanA
+Method Name:	mValidateParams
+Patch Number:	124658
+Ticket:			HTB-1479
+Purpose:		Validate parameters for the job
+Date	Ticket	Patch	Who			Description
+-------	------  ------	-----------	--------------------------------------------------------------
+ddMMMyy
+*************************************************************************************************/
+vars
+	vLender	: Lender;
+	vError	: String;
+	vIndex	: Integer;
+begin
+	if pParameters[1] = null then
+		vIndex := 1;
+		vError := 'A lender is required.';
+	endif;
+	vLender := app.myInstitution.allLenders[pParameters[1]];
+	if vError = null and vLender = null then
+		vIndex := 1;
+		vError := 'The lender name entered does not exist';
+	endif;
+	if vError = null and not pParameters[2].mEndsWith(".csv") then
+		vIndex := 2;
+		vError := 'The input file path needs to be a .csv file';
+	endif;
+	if vError = null and not pParameters[3].mEndsWith('\') then
+		vIndex := 3;
+		vError := 'Make sure the Destination Dir is ends with \';
+	endif;
+	if vIndex > 0 then
+		pParameters.clear;
+		pParameters.add(vError);
+		pIndex := vIndex;
+	endif;
+epilog
+end;

C://PATCH_CONTROL//{TO → FROM}/JobPostEvents_mProcessJob.txt RENAMED Viewed

@@ -85,20 +84,35 @@ begin
 		app.mSetMyLender(vLender);
 		app.mSetUser(app.mGetProcessUser(vLender));
-		// #HTB-1492 MarkusJ 20May22 {PROD HOTIFX} : Change collection to snapshot at time of job running
 		create vEvents transient;
 		vLender.allPendingEvents.copy(vEvents);
 		// #HTB-554 Gaurav 19Apr21 {123575} : Brought over and adjusted for HTB mismatch
 		// balance renewal posting.
 		// #CTC-128 ThabanS 17Nov20 {123275} : balance bypass check - START
-		// #HTB-1492 MarkusJ 20May22 {PROD HOTIFX} : Change collection to snapshot at time of job running
-		foreach vEvent in vEvents where//vLender.allPendingEvents where
-			vEvent.mIsRenewalEvent and
-			vEvent.aEffectiveDate = vProcessDate
-		do
 			vRenewalEvent := vEvent.RenewalEvent;
 			vAccount := vRenewalEvent.mGetAccount;
 			vCheckBalance := vAccount <> null and
 				vAccount.myLender.allLineOfBusiness[vAccount.mGetLineOfBusiness] <> null and
 				vAccount.myLender.allLineOfBusiness[vAccount.mGetLineOfBusiness].

 		app.mSetMyLender(vLender);
 		app.mSetUser(app.mGetProcessUser(vLender));
+		// #HTB-1492 MarkusJ 20May22 {PROD HOTFIX} : Change collection to snapshot at time of job running
 		create vEvents transient;
 		vLender.allPendingEvents.copy(vEvents);
+		// #HTB-1466 DarrellB 29-April-22 {124359}: exclude renewals on paid out loans
 		// #HTB-554 Gaurav 19Apr21 {123575} : Brought over and adjusted for HTB mismatch
 		// balance renewal posting.
 		// #CTC-128 ThabanS 17Nov20 {123275} : balance bypass check - START
+		// #HTB-1492 MarkusJ 20May22 {PROD HOTFIX} : Change collection to snapshot at time of job running
+		foreach vEvent in vEvents//vLender.allPendingEvents
+		where vEvent.mIsRenewalEvent
+		and vEvent.aEffectiveDate = vProcessDate
+		and vEvent.mGetAccount <> null do
 			vRenewalEvent := vEvent.RenewalEvent;
 			vAccount := vRenewalEvent.mGetAccount;
+			// #HTB-1466 DarrellB 29-April-22 {124359}: exclude renewals on paid out loans
+			if vAccount.mIsClosed then
+				app.mWriteReportLine('Loan ' & vAccount.aAccountID & ' Renewal Event not Posted due to Account Status: Paid Out. ' & vEvent.aEffectiveDate.display);
+				// #HTB-1466 MarkusJ 03Oct22 {124359}: If Renewal Event is Accepted(which should be the case here) on Paid Out loan, Cancel the event
+				if vRenewalEvent.myStatus.mGetKeyName = KN_ACCEPTED then
+					app.myGeneralTxnAgent.mBeginTrxTransaction;
+					vRenewalEvent.mSetStatusByKeyName(KN_EVENT_CANCELLED);
+					app.myGeneralTxnAgent.mCommitTrxTransaction;
+				endif;
+				//Skip Renewal Events on Paid Out Loans
+				continue;
+			endif;
 			vCheckBalance := vAccount <> null and
 				vAccount.myLender.allLineOfBusiness[vAccount.mGetLineOfBusiness] <> null and
 				vAccount.myLender.allLineOfBusiness[vAccount.mGetLineOfBusiness].

C://PATCH_CONTROL//{TO → FROM}/LMSReports_xml_PrepaymentLetter_v0.txt RENAMED Viewed

@@ -36,6 +36,9 @@ vars
 	vSecProp  : SecuredProperty;
 	vAccClient   : AccountClient;
 	vContactType : ContactType;
 begin
 	create vDoc transient;
@@ -103,7 +106,16 @@ begin
 	xml__ContactNode(pClient, 'MailingClient', vRoot);
 	xml__CreateMainBorrowerTypeClients(pAccount, false, vRoot);
 	return vDoc;
 epilog

 	vSecProp  : SecuredProperty;
 	vAccClient   : AccountClient;
 	vContactType : ContactType;
+	// #HTB-1502 SaulL 14Sep22 {124680}: Added for EffectiveDate field
+	vAccountHistory	: AccountHistory;
+	vEffectiveData	: Date;
 begin
 	create vDoc transient;
 	xml__ContactNode(pClient, 'MailingClient', vRoot);
 	xml__CreateMainBorrowerTypeClients(pAccount, false, vRoot);
+	// #HTB-1502 SaulL 14Sep22 {124680}: Added for EffectiveDate field
+	foreach vAccountHistory in pAccount.mySubLedger.allAccountHistory reversed where
+	vAccountHistory.mIsValid and
+	vAccountHistory.mIsAccountTxn and
+	vAccountHistory.AccountTxn.mGetTxnDefinition = app.myLender.allTxnDefinitions[KN_DEPOSIT, KN_PAYMENT, KN_PREPAYMENT] do
+		vEffectiveData := vAccountHistory.aEffectiveDate;
+		break;
+	endforeach;
+	locale_date(vRoot, 'EffectiveDate', vEffectiveData, null);
+	// End of #HTB-1502
 	return vDoc;
 epilog

C://PATCH_CONTROL//{TO → FROM}/LMSReports_xml_PrepaymentLetter_v1.txt RENAMED Viewed

@@ -31,7 +31,9 @@ vars
 	vBalance,
 	vPrevAmort,
 	vRemAmort	: Decimal[12,2];
 begin
 	create vDoc transient;
@@ -96,7 +98,16 @@ begin
 	xml__ContactNode(pClient, 'MailingClient', vRoot);
 	xml__CreateMainBorrowerTypeClients(pAccount, false, vRoot);
 	return vDoc;
 epilog

 	vBalance,
 	vPrevAmort,
 	vRemAmort	: Decimal[12,2];
+	// #HTB-1502 SaulL 14Sep22 {124680}: Added for EffectiveDate field
+	vAccountHistory	: AccountHistory;
+	vEffectiveData	: Date;
 begin
 	create vDoc transient;
 	xml__ContactNode(pClient, 'MailingClient', vRoot);
 	xml__CreateMainBorrowerTypeClients(pAccount, false, vRoot);
+	// #HTB-1502 SaulL 14Sep22 {124680}: Added for EffectiveDate field
+	foreach vAccountHistory in pAccount.mySubLedger.allAccountHistory reversed where
+	vAccountHistory.mIsValid and
+	vAccountHistory.mIsAccountTxn and
+	vAccountHistory.AccountTxn.mGetTxnDefinition = app.myLender.allTxnDefinitions[KN_DEPOSIT, KN_PAYMENT, KN_PREPAYMENT] do
+		vEffectiveData := vAccountHistory.aEffectiveDate;
+		break;
+	endforeach;
+	locale_date(vRoot, 'EffectiveDate', vEffectiveData, null);
+	// End of #HTB-1502
 	return vDoc;
 epilog

C://PATCH_CONTROL//{TO → FROM}/LMSReports_xml__CreateCOB_v0.txt RENAMED Viewed

@@ -186,6 +186,19 @@ begin
 	vXML.mAddElement('FeeBroker',  0.Decimal.currencyFormat);
 	//Ticket 11086 - Patch 121881 - DaltonM - Jan 2, 2019
 	create vFeeLookUp transient;
 	vFeeLookUp.mInitFromAccount(pAccount);
@@ -227,7 +240,9 @@ begin
 		endforeach;
 	elseif  pAccount <> null and pAccount.allAdvanceStatementItems.size = 0 then
-		foreach vBaseDeduce in pAccount.allFeeCodeDisburseDeducts where vBaseDeduce.mIsAdvanceDeduction(vLookup) do
 				// #HTB-101 ThabanS 06May20 {122903} : added pLocale params
 				vDecuct := vDecuct & vBaseDeduce.mGetDescription(myEnglishLocale) & CrLf;
 				vDecusAmt := vDecusAmt & vBaseDeduce.mGetAmount.currencyFormat & CrLf;

 	vXML.mAddElement('FeeBroker',  0.Decimal.currencyFormat);
+	// #HTB-1433 SaulL 13May22 {124396}: Add Appraisal fee(Client Pays) field
+	if pAccount.mGetFeeCodebyName(APPRAISAL_FEE_CLIENT_PAYS) <> null then
+		vXML.mAddElement('AppraisalFeeClientPays', pAccount.mGetFeeCodebyName(APPRAISAL_FEE_CLIENT_PAYS).mGetAmount.currencyFormat);
+	else
+		vXML.mAddElement('AppraisalFeeClientPays',0.Decimal.currencyFormat);
+	endif;
+	// #HTB-1433 SaulL 13May22 {124396}: Add Automated Valuation fee(Client Pays) field
+	if pAccount.mGetFeeCodebyName(AUTOMATED_VALUATION_FEE) <> null then
+		vXML.mAddElement('AutomatedValuationFee', pAccount.mGetFeeCodebyName(AUTOMATED_VALUATION_FEE).mGetAmount.currencyFormat);
+	else
+		vXML.mAddElement('AutomatedValuationFee', 0.Decimal.currencyFormat);
+	endif;
+	//End of HTB-1433
 	//Ticket 11086 - Patch 121881 - DaltonM - Jan 2, 2019
 	create vFeeLookUp transient;
 	vFeeLookUp.mInitFromAccount(pAccount);
 		endforeach;
 	elseif  pAccount <> null and pAccount.allAdvanceStatementItems.size = 0 then
+		// #HTB-1433 SaulL 09Aug22 {124369}: Exclude Appraisal Fee (Client Pays)
+		foreach vBaseDeduce in pAccount.allFeeCodeDisburseDeducts where vBaseDeduce.mIsAdvanceDeduction(vLookup) and
+		vBaseDeduce.FeeCodeDeductionOrDisburse.myFeeCode.aKeyName <> 'Appraisal Fee (Client Pays)' do
 				// #HTB-101 ThabanS 06May20 {122903} : added pLocale params
 				vDecuct := vDecuct & vBaseDeduce.mGetDescription(myEnglishLocale) & CrLf;
 				vDecusAmt := vDecusAmt & vBaseDeduce.mGetAmount.currencyFormat & CrLf;

C://PATCH_CONTROL//{TO → FROM}/LMSReports_xml__CreateCOB_v1.txt RENAMED Viewed

@@ -206,7 +206,23 @@ begin
 	else
 		locale_currency(vXML,'FeeDischarge',  0.Decimal);
 	endif;
 	if pAccount.mGetFeeCodebyName(KN_FCT_FEE) <> null then
 		vFeeFCT := pAccount.mGetFeeCodebyName(KN_FCT_FEE).mGetAmount;
 	elseif pAccount.mGetFeeCodebyName(KN_FCT_PLATINUM_FEE) <> null then
@@ -267,7 +283,9 @@ begin
 		endforeach;
 	elseif  pAccount <> null and pAccount.allAdvanceStatementItems.size = 0 then
-		foreach vBaseDeduce in pAccount.allFeeCodeDisburseDeducts where vBaseDeduce.mIsAdvanceDeduction(vLookup) do
 				// #HTB-101 ThabanS 06May20 {122903} : added pLocale params/vDecuctFR/vDecusAmtFR
 				vDecuct := vDecuct & vBaseDeduce.mGetDescription(myEnglishLocale) & CrLf;
 				vDecuctFR := vDecuctFR & vBaseDeduce.mGetDescription(myFrenchLocale) & CrLf;

 	else
 		locale_currency(vXML,'FeeDischarge',  0.Decimal);
 	endif;
+	// #HTB-1433 SaulL 13May22 {124396}: Add Appraisal fee(Client Pays) field
+	if pAccount.mGetFeeCodebyName(APPRAISAL_FEE_CLIENT_PAYS) <> null then
+		vXML.mAddElement('AppraisalFeeClientPays', pAccount.mGetFeeCodebyName(APPRAISAL_FEE_CLIENT_PAYS).mGetAmount.currencyFormat);
+		locale_currency(vXML,'AppraisalFeeClientPays', pAccount.mGetFeeCodebyName(APPRAISAL_FEE_CLIENT_PAYS).mGetAmount);
+	else
+		vXML.mAddElement('AppraisalFeeClientPays',0.Decimal.currencyFormat);
+		locale_currency(vXML,'AppraisalFeeClientPays', 0.Decimal);
+	endif;
+	// #HTB-1433 SaulL 13May22 {124396}: Add Automated Valuation fee(Client Pays) field
+	if pAccount.mGetFeeCodebyName(AUTOMATED_VALUATION_FEE) <> null then
+		vXML.mAddElement('AutomatedValuationFee', pAccount.mGetFeeCodebyName(AUTOMATED_VALUATION_FEE).mGetAmount.currencyFormat);
+		locale_currency(vXML,'AutomatedValuationFee',  pAccount.mGetFeeCodebyName(AUTOMATED_VALUATION_FEE).mGetAmount);
+	else
+		vXML.mAddElement('AutomatedValuationFee', 0.Decimal.currencyFormat);
+		locale_currency(vXML,'AutomatedValuationFee', 0.Decimal);
+	endif;
+	//End of HTB-1433
 	if pAccount.mGetFeeCodebyName(KN_FCT_FEE) <> null then
 		vFeeFCT := pAccount.mGetFeeCodebyName(KN_FCT_FEE).mGetAmount;
 	elseif pAccount.mGetFeeCodebyName(KN_FCT_PLATINUM_FEE) <> null then
 		endforeach;
 	elseif  pAccount <> null and pAccount.allAdvanceStatementItems.size = 0 then
+		// #HTB-1433 SaulL 09Aug22 {124369}: Exclude Appraisal Fee (Client Pays)
+		foreach vBaseDeduce in pAccount.allFeeCodeDisburseDeducts where vBaseDeduce.mIsAdvanceDeduction(vLookup)
+		and vBaseDeduce.FeeCodeDeductionOrDisburse.myFeeCode.aKeyName <> 'Appraisal Fee (Client Pays)' do
 				// #HTB-101 ThabanS 06May20 {122903} : added pLocale params/vDecuctFR/vDecusAmtFR
 				vDecuct := vDecuct & vBaseDeduce.mGetDescription(myEnglishLocale) & CrLf;
 				vDecuctFR := vDecuctFR & vBaseDeduce.mGetDescription(myFrenchLocale) & CrLf;

C://PATCH_CONTROL//{TO → FROM}/MessageMorWeb_mProcess_ImportDeal.txt RENAMED Viewed

@@ -1800,12 +1800,14 @@ PAYOUT_METHOD	Prior to Advance
 				foreach vAccountCreationClient in vAccountCreation.allAccountCreationClient
 					where (not vFoundRealEstate) do
 					foreach vAccountCreationClientReal in vAccountCreationClient.allAccountCreationRealEstate do
 						// this is probably it but ...
 						if vAccountCreationClientReal.myAddress <> null then
 							vAddress := vAccountCreationClientReal.myAddress.StreetAddress;
 							if	vAddress.aCity.toLower.trimBlanks = vAddressXML.mGetAttributeValue('townOrCity').toLower.trimBlanks
 							and	vAddress.aStreetName.toLower.trimBlanks = vAddressXML.mGetAttributeValue('streetName').toLower.trimBlanks
-							and vAddress.aStreetNumber = vAddressXML.mGetAttributeValue('houseNumber') then
 //							and vAddress.aPostalCode.toLower.trimBlanks = vAddressXML.mGetAttributeValue('postalCode').toLower.trimBlanks then
 								vFoundRealEstate := true;
 								break;

 				foreach vAccountCreationClient in vAccountCreation.allAccountCreationClient
 					where (not vFoundRealEstate) do
 					foreach vAccountCreationClientReal in vAccountCreationClient.allAccountCreationRealEstate do
+						// #HTB-1559 NormanA 13 Oct22 {124732} : bringing in CWB-153; add a check for apartment unit number (Properties could be in the same condo)
 						// this is probably it but ...
 						if vAccountCreationClientReal.myAddress <> null then
 							vAddress := vAccountCreationClientReal.myAddress.StreetAddress;
 							if	vAddress.aCity.toLower.trimBlanks = vAddressXML.mGetAttributeValue('townOrCity').toLower.trimBlanks
 							and	vAddress.aStreetName.toLower.trimBlanks = vAddressXML.mGetAttributeValue('streetName').toLower.trimBlanks
+							and vAddress.aStreetNumber = vAddressXML.mGetAttributeValue('houseNumber')
+							and vAddress.aUnit = vAddressXML.mGetAttributeValue('apartmentOrUnitNumber') then
 //							and vAddress.aPostalCode.toLower.trimBlanks = vAddressXML.mGetAttributeValue('postalCode').toLower.trimBlanks then
 								vFoundRealEstate := true;
 								break;

C://PATCH_CONTROL//FROM/MessageProcessingAgent_mCheckLendeskMessages.txt ADDED Viewed

	@@ -0,0 +1,20 @@

+mCheckLendeskMessages();
+/*************************************************************************************************
+Date Created:	27 July 2021
+Created By:		SpencerG
+Method Name:	mCheckLendeskMessages
+Patch Number:	123739
+Ticket:			LMS-291
+Purpose:		Check if lendesk is selected as the origination service
+Date	Ticket	Patch	Who			Description
+-------	------	------	-----------	--------------------------------------------------------------
+ddMMMyy
+*************************************************************************************************/
+vars
+begin
+end;

C://PATCH_CONTROL//{TO → FROM}/MessageProcessingAgent_mProcessMessage.txt RENAMED Viewed

@@ -1,4 +1,5 @@
 mProcessMessage(pMessage: Message) updating;
 /*

 mProcessMessage(pMessage: Message) updating;
+//11188 - added as updating
 /*

C://PATCH_CONTROL//{TO → FROM}/MessageProcessor_mStartTimer.txt RENAMED Viewed

@@ -38,6 +38,11 @@ begin
 		//beginTimer( 10000, Timer_Continuous, RUN_SCARLETT_MSG_CHECK) ;
 	//endif;
 	// #11475 MarkusJ 19Jun19 {122242} : Ping Equifax API for all Pending Manual Income Verifications
 	if app.mGetINIFileSetting('LMSEnvironment','EquifaxIncomeURL',null).trimBlanks.length > 1 then
 		beginTimer(30 * 60000, //min

 		//beginTimer( 10000, Timer_Continuous, RUN_SCARLETT_MSG_CHECK) ;
 	//endif;
+	// #LMS-291 SpencerG 27Jul21 {123739} : Ping Lendesk API for new deal
+	if app.mGetINIFileSetting('LMSEnvironment','LendeskURL',null).trimBlanks.length > 1 then
+		beginTimer( 10000, Timer_Continuous, RUN_LENDESK_MSG_CHECK) ;
+	endif;
 	// #11475 MarkusJ 19Jun19 {122242} : Ping Equifax API for all Pending Manual Income Verifications
 	if app.mGetINIFileSetting('LMSEnvironment','EquifaxIncomeURL',null).trimBlanks.length > 1 then
 		beginTimer(30 * 60000, //min

C://PATCH_CONTROL//{TO → FROM}/MessageProcessor_timerEvent.txt RENAMED Viewed

@@ -52,6 +52,11 @@ begin
 			//app.myMessageProcessingAgent.mCheckScarlettMessages;
 		// #LMS-255 SpencerG 29Nov21 {124023} : Ping Value Connect API for any unfetched requests
 		// #HTB-1423 SaulL 12Apr22 {124300}: Commment out Scarlett part as it's not applied for HTB
 		//elseif eventTag = RUN_VALUECONNECT_MSG_CHECK then

 			//app.myMessageProcessingAgent.mCheckScarlettMessages;
+		// #LMS-291 SpencerG 27Jul21 {123739} : Ping Lendesk API for loan in queue
+		elseif eventTag = RUN_LENDESK_MSG_CHECK then
+			app.myMessageProcessingAgent.mCheckLendeskMessages;
 		// #LMS-255 SpencerG 29Nov21 {124023} : Ping Value Connect API for any unfetched requests
 		// #HTB-1423 SaulL 12Apr22 {124300}: Commment out Scarlett part as it's not applied for HTB
 		//elseif eventTag = RUN_VALUECONNECT_MSG_CHECK then

C://PATCH_CONTROL//TO/MessagingSchema_class_info.txt DELETED Viewed

@@ -1,1213 +0,0 @@
-MessagingSchema
-MAP:_usergui
-NAME:_persistentImpRefs
-LEN:12
-NAME:_transientImpRefs
-LEN:12
-NAME:__htmlAttributeOffsetDict
-LEN:12
-NAME:__inspectorObject
-LEN:12
-NAME:__jadeHttpConnection
-LEN:12
-NAME:__overridePatchNumber
-LEN:4
-NAME:__patchControlString
-LEN:-1
-NAME:__patchVersionDict
-LEN:12
-NAME:__reportWriterRef
-LEN:12
-NAME:__webSessions
-LEN:12
-NAME:_aboutFormName
-LEN:101
-NAME:_consoleMemRefs
-LEN:33
-NAME:_defaultLocaleId
-LEN:4
-NAME:_dynamicPropertyBag
-LEN:12
-NAME:_externalDatabases
-LEN:12
-NAME:_internetPipe
-LEN:12
-NAME:_internetPipeName
-LEN:-1
-NAME:_modifiedBy
-LEN:31
-NAME:_modifiedTimestamp
-LEN:8
-NAME:_numberOfPipes
-LEN:4
-NAME:_patchVersion
-LEN:4
-NAME:_propertyBag
-LEN:-1
-NAME:_restServicesOptions
-LEN:4
-NAME:_sourceParcel
-LEN:12
-NAME:_startupFormName
-LEN:101
-NAME:_systemVersion
-LEN:9
-NAME:_useXMLConfigFile
-LEN:1
-NAME:_useXMLDocumentParser
-LEN:1
-NAME:_webAppDirectory
-LEN:-1
-NAME:_webAppExtension
-LEN:12
-NAME:_webBaseURL
-LEN:-1
-NAME:_webConfigDynamicProperties
-LEN:12
-NAME:_webDelayBetweenApps
-LEN:4
-NAME:_webDisplayMessages
-LEN:1
-NAME:_webDisplayPreference
-LEN:1
-NAME:_webEnabled
-LEN:1
-NAME:_webEventClasses
-LEN:12
-NAME:_webFinalizeMethod
-LEN:12
-NAME:_webHomePage
-LEN:101
-NAME:_webInitializeMethod
-LEN:12
-NAME:_webIsSecure
-LEN:1
-NAME:_webLogFile
-LEN:12
-NAME:_webMachineName
-LEN:-1
-NAME:_webMaxHTMLSize
-LEN:4
-NAME:_webMessage
-LEN:12
-NAME:_webMethodExecutionPrefix
-LEN:31
-NAME:_webQueue
-LEN:12
-NAME:_webServiceClasses
-LEN:-1
-NAME:_webSession
-LEN:12
-NAME:_webSessionManager
-LEN:12
-NAME:_webSessionTimeout
-LEN:4
-NAME:_webShowContent
-LEN:1
-NAME:_webShowModal
-LEN:1
-NAME:_webStartupForm
-LEN:12
-NAME:_webStartupFormName
-LEN:101
-NAME:_webStatusLineDisplay
-LEN:-1
-NAME:_webUseHTML32
-LEN:1
-NAME:_webUseSessionHandling
-LEN:1
-NAME:_webVirtualDirectory
-LEN:-1
-NAME:_webWaitForReply
-LEN:1
-NAME:aboutForm
-LEN:12
-NAME:appVersion
-LEN:31
-NAME:applicationType
-LEN:1
-NAME:controlSpacing
-LEN:4
-NAME:currentLocale
-LEN:12
-NAME:currentLocaleInfo
-LEN:12
-NAME:defaultApp
-LEN:1
-NAME:defaultMdi
-LEN:1
-NAME:exportedPackages
-LEN:12
-NAME:finalizeMethod
-LEN:12
-NAME:fontBold
-LEN:1
-NAME:fontName
-LEN:101
-NAME:fontSize
-LEN:8
-NAME:formMargin
-LEN:4
-NAME:heightSingleLineControl
-LEN:4
-NAME:helpFile
-LEN:-1
-NAME:icon
-LEN:-1
-NAME:initializeMethod
-LEN:12
-NAME:jadeWebServiceManager
-LEN:12
-NAME:mdiCaption
-LEN:-1
-NAME:mdiFrame
-LEN:12
-NAME:mousePointer
-LEN:4
-NAME:name
-LEN:101
-NAME:printer
-LEN:12
-NAME:schema
-LEN:12
-NAME:showBubbleHelp
-LEN:1
-NAME:startupForm
-LEN:12
-NAME:threeDControls
-LEN:12
-NAME:useBorderStyleOnly
-LEN:1
-NAME:userSecurityLevel
-LEN:4
-NAME:uuid
-LEN:16
-NAME:webMinimumResponseTime
-LEN:4
-NAME:_monitorException
-LEN:4
-NAME:_systemBasic
-LEN:1
-NAME:cnAppAlias
-LEN:101
-Used by JSA applications but as from 12Aug08 also by JADE Master Terminal.
-NAME:cnAppServerIsOnServer
-LEN:1
-NAME:cnApplicationRootDir
-LEN:129
-NAME:cnApplicationType
-LEN:1
-NAME:cnCheckShareLocks
-LEN:1
-NAME:cnCurrentLocaleDefaultCountryCode
-LEN:4
-NAME:cnDatabaseSubrole
-LEN:4
-NAME:cnDbPath
-LEN:129
-This attribute is used only by VB apps that use CardSchema.  If you assign a value
-to this attribute, app::dbPath will return the value of cnDbPath instead of the
-JADE app.dbPath.
-NAME:cnDistributionNode
-LEN:41
-NAME:cnDistributionProcess
-LEN:41
-NAME:cnExceptionHandlerType
-LEN:4
-NAME:cnFileRetryCount
-LEN:4
-NAME:cnForeignApp
-LEN:1
-Indicates that this is a VB app i.e. not a JADE.EXE
-NAME:cnIsForegroundClient
-LEN:1
-If the subschema developer has set this to true (only do this for user-attended GUI clients)
-then CardSchema's global lock exception handler will call cnShowLockErrorMessage if a
-lock cannot be acquired.
-The developer can reimplement this message if desired.
-NAME:cnIsServerApp
-LEN:1
-NAME:cnLockCheckInterval
-LEN:4
-NAME:cnMaxLockTimeBeforeAlarm
-LEN:4
-NAME:cnMyBackupLog
-LEN:12
-NAME:cnMyCompactLog
-LEN:12
-NAME:cnMyLaunchSentinelFile
-LEN:12
-NAME:cnOSArchitecture
-LEN:4
-Architecture of the fat client or server node.
-For thinclient architecture, refer to cnThinClientArchitecture
-NAME:cnOSPlatform
-LEN:4
-Platform of the fat client or server node.
-For thinclient platform, refer to cnThinClientPlatform
-NAME:cnOSVersion
-LEN:31
-NAME:cnProcessesWithNoLockChecks
-LEN:12
-Manually maintained collection of processes for which no lock check alarms are
-to be issued.
-NAME:cnServerGlobalExHandlerDone
-LEN:1
-NAME:cnStackDumpFileName
-LEN:256
-NAME:cnSystemType
-LEN:4
-NAME:cnThinClientOSArchitecture
-LEN:4
-NAME:cnThinClientOSPlatform
-LEN:4
-NAME:cnThinClientOSVersion
-LEN:31
-NAME:cnUseLaunchSentinelFile
-LEN:1
-NAME:cnUsedActivateMethod
-LEN:1
-NAME:myCnBackup
-LEN:12
-NAME:myCnClusterInfo
-LEN:12
-NAME:myCnCntrl
-LEN:12
-NAME:myCnDba
-LEN:12
-Reference to process transient used in KCOnLineBackup.
-NAME:myCnKarmaCntrl
-LEN:12
-NAME:myCnLdapSyntax
-LEN:12
-NAME:myCnLockCheck
-LEN:12
-NAME:myCnLog
-LEN:12
-NAME:myCnManagerClass
-LEN:12
-NAME:myCnRoot
-LEN:12
-NAME:myCnSDSDbAdmin
-LEN:12
-NAME:myCnTranLogFile
-LEN:12
-NAME:myCnTransactionStack
-LEN:12
-NAME:myDba
-LEN:12
-NAME:myJadeTestCaseListener
-LEN:12
-NAME:myTransientCnIpAddress
-LEN:12
-NAME:aAppIsUnattended
-LEN:1
-NAME:aAscPicture
-LEN:-1
-NAME:aAscPicture1
-LEN:-1
-NAME:aAscPicture2
-LEN:-1
-NAME:aAscPicture3
-LEN:-1
-NAME:aCoreServer
-LEN:1
-NAME:aDebugMode
-LEN:1
-NAME:aDescPicture
-LEN:-1
-NAME:aDescPicture1
-LEN:-1
-NAME:aDescPicture2
-LEN:-1
-NAME:aDescPicture3
-LEN:-1
-NAME:aEnvironmentID
-LEN:-1
-Use this to display what Environment the application is in.
-NAME:aIsJobProcess
-LEN:1
-If true, this app is in job processing mode.
-NAME:aLocaleName
-LEN:31
-NAME:aReadOnlyColor
-LEN:4
-NAME:aReportLinePrefix
-LEN:101
-NAME:aRestoreMode
-LEN:1
-NAME:aRunJobName
-LEN:-1
-NAME:aSystemDateControl
-LEN:31
-NAME:aTempString
-LEN:-1
-NAME:aTestServer
-LEN:1
-NAME:aTransactionJobLevel
-LEN:4
-NAME:aTrxLevel
-LEN:4
-NAME:aUserLoggedAs
-LEN:31
-NAME:allCommitPrimary
-LEN:12
-NAME:allCommitSecondary
-LEN:12
-NAME:allEmailSent
-LEN:12
-NAME:allTransientData
-LEN:12
-NAME:appStartTime
-LEN:8
-NAME:myAuditManager
-LEN:12
-NAME:myControlFile
-LEN:12
-NAME:myCoreAgent
-LEN:12
-NAME:myCoreJobRoot
-LEN:12
-NAME:myCurrencyFormat
-LEN:12
-NAME:myCurrentLocale
-LEN:12
-NAME:myHolidayControl
-LEN:12
-NAME:myIntegerFormat
-LEN:12
-NAME:myJobHelper
-LEN:12
-NAME:myJobManager
-LEN:12
-NAME:myJobProcessor
-LEN:12
-NAME:myJobWorker
-LEN:12
-Created: 12 November 2018 by Gaurav Chaudhari
-Patch Number: 121770
-LogManager for the current schema.
-NAME:myMainFormActive
-LEN:12
-NAME:myMessageProcessingAgent
-LEN:12
-NAME:myMessageProcessor
-LEN:12
-NAME:myMessagingHelper
-LEN:12
-NAME:myMessagingObject
-LEN:12
-NAME:myMessagingRoot
-LEN:12
-NAME:myMessagingWorker
-LEN:12
-NAME:myOperationControl
-LEN:12
-NAME:myRateFormats
-LEN:12
-NAME:myReportFile
-LEN:12
-NAME:vCheckHoliday
-LEN:4
-NAME:aApplicationEnabled
-LEN:1
-NAME:aErrorCode
-LEN:4
-NAME:aFormSecurityLevel
-LEN:4
-NAME:aLenderName
-LEN:256
-NAME:aSupressAudit
-LEN:1
-NAME:aTransactionServiceLevel
-LEN:4
-NAME:aTransactionTrxLevel
-LEN:4
-NAME:aTransactionWorkflowLevel
-LEN:4
-NAME:allTxns
-LEN:12
-NAME:myAppOverride
-LEN:12
-NAME:myCA
-LEN:12
-NAME:myConditionServiceEngine
-LEN:12
-NAME:myDocumentEngine
-LEN:12
-NAME:myDocumentMerge
-LEN:12
-NAME:myExceptionAgent
-LEN:12
-NAME:myExceptionCA
-LEN:12
-NAME:myFinancialTxnAgent
-LEN:12
-NAME:myFormHelper
-LEN:12
-NAME:myGeneralTxnAgent
-LEN:12
-NAME:myInstitution
-LEN:12
-NAME:myJadeReportEngine
-LEN:12
-NAME:myLMSRoot
-LEN:12
-NAME:myLender
-LEN:12
-NAME:myLogicProcessor
-LEN:12
-NAME:myNextNumberAgent
-LEN:12
-NAME:myNextNumberGenerator
-LEN:12
-NAME:myOverrideUser
-LEN:12
-NAME:myPoolingAgent
-LEN:12
-NAME:myPoolingEngine
-LEN:12
-NAME:myPoolingRoot
-LEN:12
-NAME:myRPSMonitor
-LEN:12
-NAME:myRefObj
-LEN:12
-NAME:mySearchAgent
-LEN:12
-NAME:mySelectionEngine
-LEN:12
-NAME:mySelectionRoot
-LEN:12
-NAME:mySelectionTA
-LEN:12
-NAME:myTA
-LEN:12
-NAME:myUser
-LEN:12
-NAME:myVA
-LEN:12
-NAME:myVVVRoot
-LEN:12
-NAME:myWflEngine
-LEN:12
-NAME:myWflRoot
-LEN:12
-NAME:myWflTA
-LEN:12
-NAME:myRegressionHelper
-LEN:12

C://PATCH_CONTROL//TO/MessagingSchema_mAppNameFriendly.txt DELETED Viewed

@@ -1,22 +0,0 @@
-mAppNameFriendly(): String;
-//
-//	Created	:	10 September 2018 by ThabanS
-//
-//	Purpose	:
-//
-//	Notes	:
-//
-//	Date                 Who          Bug#     Description
-//  -------              ---          -----   ------------------------------------------------------------------------
-//
-vars
-begin
-	return $MessagingManager;
-epilog
-end;

C://PATCH_CONTROL//TO/MessagingSchema_mFinalizeMessagingWorker.txt DELETED Viewed

@@ -1,28 +0,0 @@
-mFinalizeMessagingWorker()updating;
-/*
-	Created	:	12 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	if global.isValidObject(myMessagingWorker) then
-		beginTransaction;
-		myMessagingWorker.mSetStatus(WORKER_STOPPED);
-		commitTransaction;
-	endif;
-	if global.isValidObject(myMessagingHelper) then
-		myMessagingHelper.mWriteToLog('*** WORKER STOPPED ***');
-		delete myMessagingHelper;
-	endif;
-epilog
-end;

C://PATCH_CONTROL//TO/MessagingSchema_mFinalizeMsgMgr.txt DELETED Viewed

@@ -1,19 +0,0 @@
-mFinalizeMsgMgr();
-/*
-	Created	:	12 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-epilog
-end;

C://PATCH_CONTROL//TO/MessagingSchema_mFinalizeMsgProcessor.txt DELETED Viewed

@@ -1,22 +0,0 @@
-mFinalizeMsgProcessor();
-/*
-	Created	:	12 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-	vWorker : MessagingWorker;
-begin
-	foreach vWorker in app.myMessagingRoot.allWorkersByCode do
-		vWorker.causeEvent(TERMINATE_WORKER, true, 0);
-	endforeach;
-epilog
-end;

C://PATCH_CONTROL//TO/MessagingSchema_mGetErrorFiles.txt DELETED Viewed

@@ -1,31 +0,0 @@
-mGetErrorFiles():CnStringArrayv2 serverExecution;
-//
-//	Created	:	07 December 2018 by ThabanS
-//
-//	Purpose	:	//11170 - ThabanS - 14Dec2018
-//
-//	Notes	:
-//
-//	Date                 Who          Bug#     Description
-//  -------              ---          -----   ------------------------------------------------------------------------
-//
-vars
-	vAns : CnStringArrayv2;
-	vFile : FileFolder;
-	vNode : FileNode;
-begin
-	create vFile transient;
-	create vAns transient;
-	vFile.fileName := app.mGetMsgProcessorErrorFilesDir;
-	foreach vNode in vFile.files where vNode.cnGetSimpleFileName.mGetFileExtension = 'xml' do
-		vAns.add(vNode.cnGetSimpleFileName);
-	endforeach;
-	return vAns;
-epilog
-	delete vFile;
-end;

C://PATCH_CONTROL//TO/MessagingSchema_mGetLogonFormClass.txt DELETED Viewed

@@ -1,20 +0,0 @@
-mGetLogonFormClass(): Class;
-/*
-	Created	:	16 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	return FormLogonMessaging;
-epilog
-end;

C://PATCH_CONTROL//TO/MessagingSchema_mInitializeMsgMgr.txt DELETED Viewed

@@ -1,21 +0,0 @@
-mInitializeMsgMgr()updating;
-/*
-	Created	:	12 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	initialize;
-	mSetReferences;
-epilog
-end;

C://PATCH_CONTROL//TO/MessagingSchema_mInitializeMsgProcessor.txt DELETED Viewed

@@ -1,44 +0,0 @@
-mInitializeMsgProcessor() updating;
-/*
-	Created	:	12 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-	vNode 		: Node;
-	vProcess 	: Process;
-	vCnCntrl	: CnCntrl;
-begin
-	while system.getDatabaseRole = SDS_RoleSecondary do
-		process.sleep(60*5*1000);
-		write 'process is sds. cant start worker';
-	endwhile;
-	create vCnCntrl transient;
-	// Start by making sure we cannot start this thing more than once.
-	foreach vNode in system.nodes do
-		foreach vProcess in vNode.processes do
-			if vProcess.persistentApp.name = app.name and vProcess <> process then
-				vCnCntrl.cnWriteLog(0, '****** FAILURE TO START JOB PROCESSOR ******', null);
-				vCnCntrl.cnWriteLog(0, vProcess.persistentApp.name & '::' & app.name, null);
-				vCnCntrl.cnWriteLog(0, vProcess.getOidString & '::' & process.getOidString, null);
-				terminate;
-			endif;
-		endforeach;
-	endforeach;
-	app.initialize;
-	mSetReferences;
-	create myMessageProcessor transient;
-	create myMessageProcessingAgent as ServicingMsgProcessingAgent transient;
-epilog
-	delete vCnCntrl;
-end;

C://PATCH_CONTROL//TO/MessagingSchema_mSetReferences.txt DELETED Viewed

@@ -1,51 +0,0 @@
-mSetReferences()updating;
-/*
-	Created	:	12 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	create myCoreAgent as CoreAgentLMS transient;
-	myMessagingRoot := MessagingRoot.firstInstance;
-	if myMessagingRoot = null then
-		myCoreAgent.mTrxCreateMessagingRoot(myMessagingRoot);
-	endif;
-	myLMSRoot 		:= LMSRoot.firstInstance;
-	myInstitution 	:= Institution.firstInstance;
-	create myGeneralTxnAgent transient;
-	create mySearchAgent transient;
-	create myCA transient;
-	create myFinancialTxnAgent transient;
-	create myPoolingAgent transient;
-	myPoolingRoot := PoolingRoot.firstInstance;
-	// #HTB-36 ThabanS 02Jun20 {122943} : fixes issue where always set user to system user when accessing messagning GUI
-	if app.myUser = null then
-		app.myUser := myInstitution.mySystemUser;
-	endif;
-/*dgc.bug899 09Jun2011
-	create myHolidayControl transient;
-	mLoadHolidayDatesByCountry;
-*/
-epilog
-end;

C://PATCH_CONTROL//TO/MessagingSchema_mStartWorking.txt DELETED Viewed

@@ -1,73 +0,0 @@
-mStartWorking(pWorker : MessagingWorker io)updating;
-/*
-	Created	:	12 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-constants
-	ONE_SECOND = 10000;
-	TWO_SECONDS = 20000;
-	FIVE_SECONDS = 50000;
-vars
-	vDefaultLocale : Locale;
-	vHolidayControl : HolidayControl;
-begin
-	vDefaultLocale := app.mGetDefaultLocale(currentLocale.name);
-	setCurrentLocale(vDefaultLocale);
-	cnActivateKarmaControl(Cn_Fat_Client, null, null);
-	on Exception do global.mMessagingWorkerExHandler(exception) global;
-	// Clear the error code
-	aErrorCode := 0;
-/*
-	myLMSRoot 		:= LMSRoot.firstInstance;
-	myInstitution 	:= Institution.firstInstance;
-	myPoolingRoot 	:= PoolingRoot.firstInstance;
-	create myFinancialTxnAgent transient;
-	create myGeneralTxnAgent transient;
-	create myCA transient;
-	create myTA transient;
-	create myPoolingEngine transient;
-	create myPoolingAgent transient;
-	create myWflTA transient;
-	create vHolidayControl transient;
-//	mLoadHolidayDatesByCountry;
-	myHolidayControl := vHolidayControl;
-	mLoadHolidayCountries;
-	initializeMonitor;
-	aEnvironmentID := mGetINIFileSetting( 'Environment', 'EnvironmentName', null);
-*/
-	app.initialize;
-	beginNotification(pWorker, TERMINATE_WORKER, 0, 0);
-	myMessagingWorker := pWorker;
-	beginTransaction;
-	process.userInfo := myMessagingWorker.aName;
-	commitTransaction;
-	create myMessageProcessingAgent as ServicingMsgProcessingAgent transient;
-	mSetReferences;
-	create myMessagingHelper transient;
-	myMessagingHelper.mSetLogFile(myMessagingWorker.aName);
-	myMessagingHelper.mWriteToLog('*** WORKER STARTED ***');
-	myMessagingWorker.beginTimer(TWO_SECONDS, Timer_OneShot, 0);
-epilog
-end;

C://PATCH_CONTROL//TO/MessagingSchema_mTranslatableName.txt DELETED Viewed

@@ -1,22 +0,0 @@
-mTranslatableName(): String;
-//
-//	Created	:	05 June 2015 by ThabanS
-//
-//	Purpose	:
-//
-//	Notes	:
-//
-//	Date                 Who          Bug#     Description
-//  -------              ---          -----   ------------------------------------------------------------------------
-//
-vars
-begin
-	return $MessagingManager;
-epilog
-end;

C://PATCH_CONTROL//TO/MessagingSchema_userNotification.txt DELETED Viewed

@@ -1,26 +0,0 @@
-userNotification(eventType: Integer; theObject: Object; userTag: Integer; userInfo: Any) updating;
-/*
-	Created	:	12 March 2010 by JasonD
-	Purpose	:
-	Notes	:
-*/
-vars
-begin
-	if eventType = TERMINATE_WORKER then
-		beginTransaction;
-		myMessagingWorker.mSetStatus(WORKER_STOPPED);
-		delete myMessagingWorker.myMessage;
-		commitTransaction;
-		terminate;
-	endif;
-epilog
-end;

C://PATCH_CONTROL//FROM/OperationControl_mToggleLendesk.txt ADDED Viewed

	@@ -0,0 +1,41 @@

+mToggleLendesk(): Boolean serverExecution;
+/*************************************************************************************************
+Date Created:	27 July 2021
+Created By:		SpencerG
+Method Name:	mToggleLendesk
+Patch Number:	123739
+Ticket:			LMS-291
+Purpose:		Add toggle control for Lendesk DOS system
+Date	Ticket	Patch	Who			Description
+-------	------	------	-----------	--------------------------------------------------------------
+ddMMMyy
+*************************************************************************************************/
+vars
+	vFile: File;
+	vPath : String;
+begin
+	vPath := app.getTransientDbPath;
+	if vPath = null then
+		vPath := app.mGetFailSafePath;
+	else
+		vPath := vPath & '../lendesk.flag';
+	endif;
+	create vFile transient;
+	vFile.fileName := vPath;
+	if vFile.isAvailable then
+		vFile.purge;
+		return false;
+	else
+		vFile.writeString('enabled');
+		vFile.close;
+		return true;
+	endif;
+epilog
+	delete vFile;
+end;

C://PATCH_CONTROL//{TO → FROM}/RegressionAgent_init_Core2.txt RENAMED Viewed

@@ -494,8 +494,8 @@ Whole Loan|true|false|false|false|false|false|false|true|false|Cash Back,Collect
 		vInvestorTypeBucketDefinitionLinks,
 		vVal[8].Boolean,
 		vVal[7].Boolean, null, null, null, null, false,
-		false //// #HTB-1315 ThabanS 14Feb22 {124196} :  added chkUseInvestorBankFund
-		);
 		// #11785 DonC 28May19 {122233} : DEV CTC remove to compile
 //		,null,null);
 		//endif;

 		vInvestorTypeBucketDefinitionLinks,
 		vVal[8].Boolean,
 		vVal[7].Boolean, null, null, null, null, false,
+		false, //// #HTB-1315 ThabanS 14Feb22 {124196} :  added chkUseInvestorBankFund
+		null);
 		// #11785 DonC 28May19 {122233} : DEV CTC remove to compile
 //		,null,null);
 		//endif;

C://PATCH_CONTROL//{TO → FROM}/RegressionScript_script_create_FeeCode.txt RENAMED Viewed

@@ -77,6 +77,7 @@ begin
 	// accordingly to reflect this, added new params flexibility according to above.
 	// Added JSON based params.
 	// #HTB-1355 MarkusJ 12Apr22 {124293} : added FeeCodeInvestorTypeLinks -> null here
 	app.myGeneralTxnAgent.trxUpdateFeeCode(vFeeCode,
 		vLocaleDict,
 		pName,
@@ -111,7 +112,8 @@ begin
 		pDepositTxn,
 		app.mGetTerminology(TT_FEE_MULTIPLY_TERM, vMultiplyTerm), // Multiply Term param.
 		pJSON.mJSONGet(JSON_FeeCode_FullyAmortizeOnSale).Boolean,
-		null);
 	return vFeeCode;

 	// accordingly to reflect this, added new params flexibility according to above.
 	// Added JSON based params.
 	// #HTB-1355 MarkusJ 12Apr22 {124293} : added FeeCodeInvestorTypeLinks -> null here
+	//#HTB-1433 SaulL 04Nov22 {124813}: Adding a new property, -> true here
 	app.myGeneralTxnAgent.trxUpdateFeeCode(vFeeCode,
 		vLocaleDict,
 		pName,
 		pDepositTxn,
 		app.mGetTerminology(TT_FEE_MULTIPLY_TERM, vMultiplyTerm), // Multiply Term param.
 		pJSON.mJSONGet(JSON_FeeCode_FullyAmortizeOnSale).Boolean,
+		null,
+		true);
 	return vFeeCode;

C://PATCH_CONTROL//{TO → FROM}/SelectionCondition_mEvaluateObject.txt RENAMED Viewed

@@ -37,6 +37,7 @@ app.mStartAudit(self);
 	endif;
 	// Get the property of the attribute.
 	vAttrValue := vObj.getPropertyValue( myExposedAttribute.aAttributeName).String;
 	// Do the comparison.

 	endif;
 	// Get the property of the attribute.
+	vReportMsg := myExposedAttribute.aAttributeName;
 	vAttrValue := vObj.getPropertyValue( myExposedAttribute.aAttributeName).String;
 	// Do the comparison.

C://PATCH_CONTROL//{TO → FROM}/ServicingModelSchema_mBuildInfo.txt RENAMED Viewed

@@ -22,8 +22,8 @@ begin
 	pReleaseName	:= app.mGetSystemName;
 	// Update Date for each code release, keep synchronized with QA (same or higher)
-  	pReleaseDate	:= '27 October 2022'.Date;
-  	pBuild			:= '3.HTB.17.16';
 epilog

 	pReleaseName	:= app.mGetSystemName;
 	// Update Date for each code release, keep synchronized with QA (same or higher)
+  	pReleaseDate	:= '08 November 2022'.Date;
+  	pBuild			:= '3.HTB.18.6';
 epilog

C://PATCH_CONTROL//{TO → FROM}/SystemEventEngine_mProcessAdvance.txt RENAMED Viewed

@@ -254,7 +254,9 @@ begin
 	//mAbortServiceTransaction;
 	// 6932
-	foreach vBaseDeduction in  pAdvanceEvent.myAdvanceScheduleItem.allBaseFundingDeductions where vBaseDeduction.isKindOf(FeeCodeDeductionOrDisburse) do
 		vFeeCodeDeductionOrDisburse := vBaseDeduction.FeeCodeDeductionOrDisburse;
 		vFeeCodeDeductionOrDisburse.mPostFee(vLookupDetails, vFundTxn , pAdvanceEvent);
 	endforeach;

 	//mAbortServiceTransaction;
 	// 6932
+	// #HTB-1433 MarkusJ 14Nov22 {124396} : Only Post Fee if Allowed on Advance Statement (not aNotIncludedInAdvStm)
+	foreach vBaseDeduction in  pAdvanceEvent.myAdvanceScheduleItem.allBaseFundingDeductions where vBaseDeduction.isKindOf(FeeCodeDeductionOrDisburse)
+	and (vBaseDeduction.FeeCodeDeductionOrDisburse.myFeeCode <> null and not vBaseDeduction.FeeCodeDeductionOrDisburse.myFeeCode.mGetANotIncludedInAdvStm) do
 		vFeeCodeDeductionOrDisburse := vBaseDeduction.FeeCodeDeductionOrDisburse;
 		vFeeCodeDeductionOrDisburse.mPostFee(vLookupDetails, vFundTxn , pAdvanceEvent);
 	endforeach;

C://PATCH_CONTROL//{TO → FROM}/UnderwritingData_class_info.txt RENAMED Viewed

@@ -295,17 +295,32 @@ LEN:1
 NAME:aPreAppApplicationDate
 LEN:8
 NAME:aPreAppCommitmentDate
 LEN:8
 NAME:aPreAppCommitmentExpirtyDate
 LEN:8
 NAME:aPreviousBankruptcyorCP
 LEN:1
@@ -437,6 +452,17 @@ LEN:12
 NAME:myPreviousSubStatus
 LEN:12
@@ -465,3 +491,14 @@ LEN:12
 Terminology Type:  ACCOUNT_REVIEW_STATUS

 NAME:aPreAppApplicationDate
 LEN:8
+Date Created:	26 September 2019
+Created By:		ThabanS
+Property Name:	#propertyName
+Patch Number:	5245
+Ticket:			99999
+Purpose:		Not Implemented
 NAME:aPreAppCommitmentDate
 LEN:8
+Date Created:	26 September 2019
+Created By:		ThabanS
+Property Name:	#propertyName
+Patch Number:	5245
+Ticket:			99999
+Purpose:		Not Implemented
 NAME:aPreAppCommitmentExpirtyDate
 LEN:8
+Date Created:	26 September 2019
+Created By:		ThabanS
+Property Name:	#propertyName
+Patch Number:	5245
+Ticket:			99999
+Purpose:		Not Implemented
 NAME:aPreviousBankruptcyorCP
 LEN:1
+NAME:myPledgedAccount
+LEN:12
+Pledged Account
+Date Created:   04 October 2022
+Created By:     NormanA
+Property Name:  myPledgedAccount
+Patch Number:   124658
+Ticket:         HTB-1479
+Purpose:        Pledged Account Terminology reference
 NAME:myPreviousSubStatus
 LEN:12
 Terminology Type:  ACCOUNT_REVIEW_STATUS
+NAME:virtPledgedAccountString
+LEN:-1
+Date Created:   05 October 2022
+Created By:     NormanA
+Property Name:  virtMyPledgedAccount
+Patch Number:   124658
+Ticket:         HTB-1479
+Purpose:        virt Attribute to be used for selection plans

C://PATCH_CONTROL//FROM/UnderwritingData_getPledgedAccount.txt ADDED Viewed

	@@ -0,0 +1,25 @@

+getPledgedAccount(): Terminology;
+/*************************************************************************************************
+Date Created:	04 October 2022
+Created By:		NormanA
+Method Name:	getPledgedAccount
+Patch Number:	124658
+Ticket:			HTB-1479
+Purpose:		Get Pledged Account Terminology associated with this account
+Date	Ticket	Patch	Who			Description
+-------	------  ------	-----------	--------------------------------------------------------------
+ddMMMyy
+*************************************************************************************************/
+vars
+begin
+	return myPledgedAccount;
+epilog
+end;

C://PATCH_CONTROL//FROM/UnderwritingData_setPledgedAccount.txt ADDED Viewed

	@@ -0,0 +1,26 @@

+setPledgedAccount(pPledgedAccount: Terminology) updating;
+/*************************************************************************************************
+Date Created:	04 October 2022
+Created By:		NormanA
+Method Name:	setPledgedAccount
+Patch Number:	124658
+Ticket:			HTB-1479
+Purpose:		Set pledge Account associated with this loan
+Date	Ticket	Patch	Who			Description
+-------	------  ------	-----------	--------------------------------------------------------------
+ddMMMyy
+*************************************************************************************************/
+vars
+begin
+	app.mStartAudit(self);
+	myPledgedAccount := pPledgedAccount;
+epilog
+end;

C://PATCH_CONTROL//FROM/UnderwritingData_virtPledgedAccountString.txt ADDED Viewed

	@@ -0,0 +1,34 @@

+virtPledgedAccountString(set: Boolean; _value: String io) mapping;
+/*************************************************************************************************
+Date Created:	05 October 2022
+Created By:		NormanA
+Method Name:	virtMyPledgedAccount
+Patch Number:	124658
+Ticket:			HTB-1479
+Purpose:		virt Attribute to be used for non pledged selected plan
+Date	Ticket	Patch	Who			Description
+-------	------  ------	-----------	--------------------------------------------------------------
+ddMMMyy
+*************************************************************************************************/
+vars
+begin
+	if set then
+		// set code here
+	else
+		_value := null;
+		if getPledgedAccount <> null then
+			_value := getPledgedAccount.mGetKeyName;
+		endif;
+	endif;
+epilog
+end;

C://PATCH_CONTROL//{TO → FROM}/User_mIsDeveloper.txt RENAMED Viewed

@@ -24,13 +24,13 @@ begin
 	// #HTB-275 Gaurav 11May20 {122917} :  Unioned user names from STG2.
 	if aUserName.isOneOf('ThabanS',
 		'GauravC','gchaudhari',
-		'MarkusJ','mjeeger',
 		'JoyceC',
 		'DerekC',
 		'BillR',
 		//'DanaM',
 		'BajS',
-		'DarrellB','dbyrne',
 		'JenniferM',
 		'HeenaM','hmistry',
 		'dshanmugalingam','DeepthiS',
@@ -42,11 +42,9 @@ begin
 		'KarenV','kvo',
 		'mparas',
 		'SpencerG',
-		'hpahuja',
-		'engo',
-		'ElvisN',
-		'dpaneri',
-		'DevangP'
 		)
 	then
 		return true;

 	// #HTB-275 Gaurav 11May20 {122917} :  Unioned user names from STG2.
 	if aUserName.isOneOf('ThabanS',
 		'GauravC','gchaudhari',
+		'MarkusJ',
 		'JoyceC',
 		'DerekC',
 		'BillR',
 		//'DanaM',
 		'BajS',
+		'DarrellB',
 		'JenniferM',
 		'HeenaM','hmistry',
 		'dshanmugalingam','DeepthiS',
 		'KarenV','kvo',
 		'mparas',
 		'SpencerG',
+		'KyleE',
+		'SaulL',
+		'NormanA'
 		)
 	then
 		return true;

Diff FROM TO (MANUAL)